我有数据
N11.1 N22.2 N33.1 N44.1 N21.1 N31.1 N32.1
Sinus 1 0 0 0.0 0 0 12.0
ArrAHB 1 0 0 0.1 0 0 20.9
我想在其中添加一个名为ID
和Sinus
的额外列ArrAHB
。
require(lattice)
Sinus<-c(1,0,0,0,0,0,12)
ArrAHB<-c(1,0,0,0.1,0,0,20.9)
Labels<-c("N11.1","N22.2","N33.1","N44.1","N21.1","N31.1","N32.1")
ID<-c("Sinus","Arr/AHB")
data.female<-data.frame(Sinus,ArrAHB,row.names=Labels)
data.female<-t(data.female)
> data.female$ID<-ID
Warning message:
In data.female$ID <- ID : Coercing LHS to a list
为什么ID列的创建会导致data.frame中的强制?
P.S。我的目标是将此数据转换为barchart(N11.1+N22.1+N33.1+N44.1+N21.1+N31.1+N32.1 ~ ID, data=data.female)
TaskQueue
这样的表单,这需要一个新的ID列here,我无法理解为什么这个ID添加有时会起作用,有时不起作用。请解释一下。
答案 0 :(得分:8)
它正在发出警告,因为转置t()
的结果是一个矩阵。 Matricies没有可访问的列名。在使用as.data.frame()
这很有效。
Sinus<-c(1,0,0,0,0,0,12)
ArrAHB<-c(1,0,0,0.1,0,0,20.9)
Labels<-c("N11.1","N22.2","N33.1","N44.1","N21.1","N31.1","N32.1")
ID<-c("Sinus","Arr/AHB")
data.female<-data.frame(Sinus,ArrAHB,row.names=Labels)
data.female<-as.data.frame(t(data.female))
data.female$ID<-ID
请记住,数据框是按列定义的,而不是按行定义的。数据框定义应按列。
答案 1 :(得分:0)
我知道这很晚,但是遇到了同样的问题。您可以这样做:
data.female <- cbind(data.female, ID)