一、因子的特点或性质
1、因子可视为C或JAVA语言中的枚举，适用于有限状态的表示。
2、因子不可以赋枚举集合外的值，如一个因子包含male,female,则不能再赋male和female以为的值，赋其他值会将该元素设置为空值。
二、因子的建立
1、因子的建立
假定有因子gendor，为一组人的性别：
|
1
|
> gendor<-factor(c('m','f','f','m'),labels=c('male','female')） |
则通过上式建立一个性别因子。
|
1
2
3
|
> gendor[1] female male male femaleLevels: male female |
可以看到有两个级别（或水平），分别是male和female。
2、有序因子
若因子需要有序，比如差，一般，好，很好，非常好，则可使用order参数：order=TRUE。
例如：
|
1
2
3
4
5
6
7
8
9
|
>qulity<-c('good','common','good','better','excellent')> q<-factor(qulity,levels=c('bad','good','common','better','excellent'),+ labels=c('bad','good','common','better','excellent'),order=TRUE)> q[1] good common good better excellentLevels: bad < good < common < better < excellent> q[4][1] betterLevels: bad < good < common < better < excellent |
三、因子与向量的转换
1、向量到因子转换
实际上就是构造因子，例如上例：
|
1
2
3
4
5
|
>qulity<-c('good','common','good','better','excellent')> q<-factor(qulity,levels=c('bad','good','common','better','excellent'),+ labels=c('bad','good','common','better','excellent'),order=TRUE)> str(q) Ord.factor w/ 5 levels "bad"<"common"<..: 3 2 3 4 5 |
2、因子到向量的转换
（1）使用as.vector()函数，例子：
|
1
2
3
4
5
6
7
8
9
10
11
12
|
> q<-factor(qulity,levels=c('bad','common','good','better','excellent'),+ labels=c('bad','common','good','better','excellent'),order=TRUE)> q[1] good common good better excellentLevels: bad < common < good < better < excellent> str(q) Ord.factor w/ 5 levels "bad"<"common"<..: 3 2 3 4 5> q2<-as.vector(q)> q2[1] "good" "common" "good" "better" "excellent"> str(q2) chr [1:5] "good" "common" "good" "better" "excellent" |
可以看到已经转换为字符型。
（2）使用as.numeric()函数，因子被转换为数字，例子：
|
1
2
3
4
5
|
> q2<-as.numeric(q)> q2[1] 3 2 3 4 5> str(q2) num [1:5] 3 2 3 4 5 |
参考：
因子(factor)和有序因子(ordered factor)
因子用来存储类别变量(categorical variables)和有序变量，这类变量不能用来计算而只能用来分类或者计数。因子表示分类变量，有序因子表示有序变量。
生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...)，其中data是数据，levels是因子水平向量，labels是因子的标签向量。
1、创建一个因子。
例1：
|
1
2
3
4
5
6
7
8
|
colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')col <- factor(colour)col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))col_vec <- as.vector(col2) #转换成字符向量col_num <- as.numeric(col2) #转换成数字向量col3 <- factor(colour, levels = c('G', 'R')) |
2、创建一个有序因子
例1：
|
1
2
|
score <- c('A', 'B', 'A', 'C', 'B')score1 <- ordered(score, levels = c('C', 'B', 'A')); score1 |
3、用cut()函数将一般的数据转换成因子或有序因子
例1：
|
1
2
3
4
5
6
|
exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, 65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)exam1 <- cut(exam, breaks = 3) #切分成3组exam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')ordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子 |
以上为个人经验，希望能给大家一个参考，也希望大家多多支持服务器之家。如有错误或未考虑完全的地方，望不吝赐教。
原文链接：https://blog.csdn.net/hongweigg/article/details/49387079
