我有一个数据帧中的向量,我想把它分成许多列向量,如下所示:
region<- c("US","India", "France", "Greece")
id<- c(1, 2,3,4)
df1<- data.frame(region,id)
我想将数据帧分割如下:
region.US region.India region.France region.Greece id
1 0 0 0 1
0 1 0 0 2
0 0 1 0 3
0 0 0 1 4
有什么建议吗?
要得到确切的输出:
cbind(setNames(as.data.frame(diag(nrow(df1))), paste0("region.", df1$region)),
df1[,"id", drop=FALSE])
# region.US region.India region.France region.Greece id
# 1 1 0 0 0 1
# 2 0 1 0 0 2
# 3 0 0 1 0 3
# 4 0 0 0 1 4
尝试这个,即使它不是你想要的。
t(table(df1))
region
id France Greece India US
1 0 0 0 1
2 0 0 1 0
3 1 0 0 0
4 0 1 0 0
这几乎可以工作(列的顺序不相同,并且列名没有点分隔):
df1 <- data.frame(region=c("US","India", "France", "Greece"),
id=1:4)
data.frame(model.matrix(~region-1,df1),id=df1$id)