R“熔铸”类似操作

时间:2013-11-11 22:25:14

标签: r reshape reshape2

我有一个文件包含这样的内容:

name: erik
age: 7
score: 10
name: stan
age:8
score: 11
name: kyle 
age: 9
score: 20
...

如您所见,每条记录实际上在文件中包含3行。我想知道如何在文件中读取并转换为数据数据框如下所示:

name    age    score
erik    7      10
stan    8      11
kyle    9      20
...

到目前为止我做了什么(感谢tcash21):

> data <- read.table(file.choose(), header=FALSE, sep=":", col.names=c("variable", "value"))
> data
variable  value
1     name   erik
2      age      7
3    score     10
4     name   stan
5      age      8
6    score     11
7     name  kyle 
8      age      9
9    score     20

我在想如何通过:将列拆分为两列,然后在reshape包中使用类似cast之类的东西来做我想要的? 或者我如何获得仅具有索引号1,4,7,...的行,其具有常量步骤

谢谢!

2 个答案:

答案 0 :(得分:1)

另一种可能性:

library(reshape2)
df$id <- rep(1:(nrow(df)/3), each = 3)
dcast(df, id ~ variable, value.var = "value")

#   id age  name score
# 1  1   7  erik    10
# 2  2   8  stan    11
# 3  3   9  kyle    20

答案 1 :(得分:0)

如果格式是可预测的,您可能想要做一些非常简单的事情,比如

# recreate data
data <- as.matrix(c("erik",7,10,"stan",8, 11,"kyle",9,20),ncol=1)

# get individual variables
names <- data[seq(1,length(data)-2,3)]
age <- data[seq(2,length(data)-1,3)]
score <- data[seq(3,length(data),3)]

# combine variables
reformatted.data <- as.data.frame(cbind(names,age,score))