r - R - 使用来自 gtools 的混合顺序

Question

有人可以帮忙吗？

这是两行 R 代码，我想将它们合并为一行

smplA_Bacillus = subset(smplA, select = c(lab_id, Bacillus_C))
smplA_Bacillus = smplA_Bacillus[mixedorder(smplA_Bacillus$Bacillus_C),]

混合顺序来自 gtools 但我不确定这两个命令是否可以一起使用。

当我尝试以下操作时，我收到一条错误消息

smplA_Bacillus = subset(smplA, select = c(lab_id, Bacillus_C))
smplA_Bacillus = smplA_Bacillus[mixedorder(subset(smplA, select = c(lab_id, Bacillus_C)$Bacillus_C),])

错误：“smplA_Bacillus = smplA_Bacillus[mixedorder(subset(smplA, select = c(lab_id, Bacillus_C)$Bacillus_C),]”中的意外 ']'

任何帮助，将不胜感激。

Answer 1

其中任何一个都应该这样做：

smplA_Bacillus = subset(smplA, select = c(lab_id, Bacillus_C) 
                               # select columns with subset
                                                      )[       #ordering with "["
                                               mixedorder(smplA_Bacillus$Bacillus_C), ]

 smplA_Bacillus = smplA[ mixedorder(smplA_Bacillus$Bacillus_C),
                                #ordering with the 'i' argument to"["
                                           c("lab_id", "Bacillus_C") ]
                                #selecting columns  with the j argument to "["