Factor是R中的一种数据类型，个人理解就是高级编程语言（C/C++,Python,PHP等）中的枚举。
选取Factor数组中的子集不像character，numeric那样直观，在这里记录选取方法，可能不是最简洁的，如果有，还请高手指点。
主要思路：将factor转成character，然后按照character的方式选取子集。
看个例子：
fv <- rep(c('a','b'),5)
fv <- as.factor(fv)
输出如下数据
[1] a b a b a b a b a b Levels: a b
现在，需要将fv的所有枚举取到，也就是'a'和'b'
names(summary(fv))
输出如下
[1] "a" "b"
通过下面的代码可以分别取到’a‘或’b‘的子集
labels <- names(summary(fv)) fv[fv == labels[1]] # 选取a的子集 fv[fv == labels[2]] # 选取b的子集
输出如下
> fv[fv == labels[1]] # 选取a的子集 [1] a a a a a Levels: a b > fv[fv == labels[2]] # 选取b的子集 [1] b b b b b Levels: a b
到这里，提供一种更为方便的思路：将factor转化成numeric后，可以按照numeric的方式选取子集。
s <- as.factor(rep(c('a','b'),5))
as.numeric(s)
得到的数据如下：
[1] 1 2 1 2 1 2 1 2 1 2
第一种方法比较笨拙，建议使用第二种方法。
本文转自bourneli博客园博客，原文链接：http://www.cnblogs.com/bourneli/archive/2013/02/10/2909752.html，如需转载请自行联系原作者
