R 如何在一个数据帧内合并两个列表？

我有一个接受datatable的函数：

create.p <- function(data_F){
   
    p.ad <- lapply(strsplit(data_F, " "), function(x) p.adjust(as.numeric(x)))
    data_F<- lapply(strsplit(data_F, " "), function(x) as.numeric(x))
    rez <- paste(data_F,p.ad)
    return(rez)

}

我所期望的是：

paste(data_F,p.ad)
#"1,0-1.00"
#"0.06-0.18"
#"0.07-0.18"

但是当我合并时，没有任何变化

试试这个

create.p <- function(data_F){
  
  p.ad <- lapply(strsplit(data_F, " "), function(x) p.adjust(as.numeric(x)))
  data_F<- lapply(strsplit(data_F, " "), function(x) as.numeric(x))
  rez <- paste0(unlist(data_F),'-',unlist(p.ad))
  return(rez)
  
}

---

create.p如果您创建一个小的可复制示例以及预期的输出，那么会更容易提供帮助。阅读。@sorifiend我想在函数内部建立一个联合，以便稍后在数据中打开它。Table是的，它对我有用，它将每个值打印在一个新列中，我如何使它在一个列中计数？我试着用lappy
rez，我不知道你在找什么，但让我试着回答。我假设您想要合并
create.p
的输出。尝试使用
paste（create.p（data_F），collapse='#'）
实际上，它在每列中记录一个结果。
create.p <- function(data_F){
  
  p.ad <- lapply(strsplit(data_F, " "), function(x) p.adjust(as.numeric(x)))
  data_F<- lapply(strsplit(data_F, " "), function(x) as.numeric(x))
  rez <- paste0(unlist(data_F),'-',unlist(p.ad))
  return(rez)
  
}