使用2行的信息定义列标题

Question

我希望将表S2中的标题列定义为Row1_Row2中的信息。

我目前可以使用以下行从第1行或第R2行设置列标题：

R> colnames(S2) <- S2[1,]

但我一直无法找到在标题中包含R1和R2的方法。

任何帮助都会很棒！

Answer 1

我猜你的意思是这样的

S2 <- matrix(letters[1:15], nrow=3)
S2
#      [,1] [,2] [,3] [,4] [,5]
# [1,] "a"  "d"  "g"  "j"  "m" 
# [2,] "b"  "e"  "h"  "k"  "n" 
# [3,] "c"  "f"  "i"  "l"  "o" 

colnames(S2) <- paste(S2[1,], S2[2,], sep="_")
S2
#      a_b d_e g_h j_k m_n
# [1,] "a" "d" "g" "j" "m"
# [2,] "b" "e" "h" "k" "n"
# [3,] "c" "f" "i" "l" "o"