如何将多个数据帧列合并为一个?

时间:2016-07-18 22:41:54

标签: r merge rowsum

我有一个包含21列的数据框。我想将这些列中的15列合并为一个可以识别为变量“其他”的列。到目前为止,这是我的代码,到目前为止我没有运气这么做,其中rowSums表示

Error in as.data.frame(y) : argument "y" is missing, with no default 

我不知道还能尝试什么。

#Read in group abundances
 group.raw <- read.table("taxa_levels/phylum.txt", header=T, row.names=1, sep = "\t")
 group <- t(group)
 group <- sweep(group, 1, rowSums(group), '/') #Calculate relative abundance 
 group$Other <- rowSums(c("p__1", "p__2", "p__5", "p__6", "p__7", "p__8", "p__11", "p__12", "p__13", "p__14", "p__16", "p__17", "p__18", "p__19", "p__20"))

数据'组'如下所示:

  row.names     p__1            p__2    
  1 X30841102   3.369851e-06    0.000000e+00    
  2 X49812105   0.000000e+00    0.000000e+00

 > str(group)
  num [1:152, 1:21] 3.37e-06 0.00 0.00 0.00 0.00 ...
  - attr(*, "dimnames")=List of 2
  ..$ : chr [1:152] "X30841102" "X49812105" "X26402102" "X25951102" ...
  ..$ : chr [1:21] "p__1" "p__2" "p__3" "p__4" ...

0 个答案:

没有答案