实际上您有很多选项:数据框(关系表)或列表。下面的代码将显示如何创建一个数据框,然后将其分成包含元素{x,y}或{A,B,C,D}的列表:
> txt <- " Min Max Mean StdDev
+ A
+ x 3 10 6.6 2.1
+ y 2 5 3.2 1.7
+ B
+ x 3 10 6.6 2.1
+ y 2 5 3.2 1.7
+ C
+ x 3 10 6.6 2.1
+ y 2 5 3.2 1.7
+ D
+ x 3 10 6.6 2.1
+ y 2 5 3.2 1.7
+ "
>
> data <- head(readLines(textConnection(txt)),-1)
> fields <- strsplit(sub("^[ ]+","",data[!nchar(data)==1]),"[ ]+")
> DF <- `names<-`(data.frame(rep(data[nchar(data)==1],each=2), ## letters
+ do.call(rbind,fields[-1])), ## data
+ c("Letter","xy",fields[[1]])) ## colnames
> split(DF,DF$xy)
$x
Letter xy Min Max Mean StdDev
1 A x 3 10 6.6 2.1
3 B x 3 10 6.6 2.1
5 C x 3 10 6.6 2.1
7 D x 3 10 6.6 2.1
$y
Letter xy Min Max Mean StdDev
2 A y 2 5 3.2 1.7
4 B y 2 5 3.2 1.7
6 C y 2 5 3.2 1.7
8 D y 2 5 3.2 1.7
> split(DF,DF$Letter)
$A
Letter xy Min Max Mean StdDev
1 A x 3 10 6.6 2.1
2 A y 2 5 3.2 1.7
$B
Letter xy Min Max Mean StdDev
3 B x 3 10 6.6 2.1
4 B y 2 5 3.2 1.7
$C
Letter xy Min Max Mean StdDev
5 C x 3 10 6.6 2.1
6 C y 2 5 3.2 1.7
$D
Letter xy Min Max Mean StdDev
7 D x 3 10 6.6 2.1
8 D y 2 5 3.2 1.7
谢谢Stephen。这非常有帮助。 – Daniel 2010-01-11 02:24:37