我是一款有用的助手,可以为您进行翻译。以下是需要翻译的内容:
我希望做的是将每一列(第一列除外)分成两列。输出应该像这样(4行,9列):
我希望能够循环执行此操作,并将其应用于一个数据帧中的所有列。
提前致谢。
我有一个数据框,它长这样(4行5列):
Marker ind1 ind2 ind3 ind4
mark1 CT TT CT TT
mark2 AG AA AG AA
mark3 AC AA AC AA
mark4 CT TT CT TT
我希望做的是将每一列(第一列除外)分成两列。输出应该像这样(4行,9列):
Marker ind1 ind1 ind2 ind2 ind3 ind3 ind4 ind4
mark1 C T T T C T T T
mark2 A G A A A G A A
mark3 A C A A A C A A
mark4 C T T T C T T T
我知道如何拆分一列
do.call(rbind,strsplit(test$JRP4RA6119.039, ""))
which gives this:
[,1] [,2]
[1,] "C" "T"
[2,] "A" "G"
[3,] "A" "C"
[4,] "C" "T"
我希望能够循环执行此操作,并将其应用于一个数据帧中的所有列。
提前致谢。
setNames(data.frame(1, 2), c("x", "x"))
。 - talat