COLNAMESfunction不能读取正确的标签

我的应用程序从Excel中读取数据到数据框中。 然后转换数据(谢谢excel),然后build立一个数据框架。

我想将读取过程中分配的列名replace为第一行的内容。

这是我如何尝试replace列名称。 这似乎是标准的做法。 但是,结果如下:

>require(XLConnect) >wb <- loadWorkbook("test.xlsx") >df1 <- readWorksheet(wb, sheet="df1") >tdf1 <- t(df1) >df1<- data.frame(tdf1) >tdf1 <- NULL >colnames(df1) [1] "X1" "X2" "X3" "X4" "X5" > df1[1,] X1 X2 X3 X4 X5 LABEL ONE TWO THREE FOUR FIVE > colnames(df1) = df1[1,] > colnames(df1) [1] "6" "5" "5" "6" "4" 

我期望colnames(df1)是

  LABEL ONE TWO THREE FOUR FIVE 

我做错了什么?

谢谢,Matt

这里是数据

 LABEL CLASS LOW HIGH Baseline MIN MAX SOURCE1 SOURCE2 ONE TYPE1 10 20 NA NA 5 6 TWO TYPE1 90 100 NA NA 7 THREE TYPE2 0 0 NA NA 8 FOUR TYPE3 80 130 120 NA NA 9 10 FIVE TYPE3 95 110 NA NA 11 

我想你会得到每一行的枚举版本。

这将工作…

 unname(unlist(df1[1,]))