- 在线时间
- 27 小时
- 最后登录
- 2013-5-20
- 注册时间
- 2012-11-2
- 听众数
- 15
- 收听数
- 1
- 能力
- 0 分
- 体力
- 3870 点
- 威望
- 0 点
- 阅读权限
- 60
- 积分
- 1335
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 347
- 主题
- 320
- 精华
- 0
- 分享
- 0
- 好友
- 6
升级   33.5% TA的每日心情 | 奋斗 2013-6-15 16:58 |
---|
签到天数: 24 天 [LV.4]偶尔看看III
 群组: 第四届数学中国美赛实 |
因子(factor)和有序因子(ordered factor) 因子用来存储类别变量(categorical variables)和有序变量,这类变量不能用来计算而只能用来分类或者计数。
( e! F6 H: x/ W! S: C8 P因子表示分类变量,有序因子表示有序变量。
. h4 q' X3 S8 O7 X. J4 @9 x9 A: c生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的
7 H- u5 F7 b& e# h I* U& D" d% _/ N6 S, J. T: D' f; s
标签向量。, l7 |$ T, P* X$ r( S
1、创建一个因子。- C$ T0 t$ f+ b* l
例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')8 @1 P* ]. |; F6 V0 Y3 c
col <- factor(colour)
9 W, P7 _2 d7 q' L9 ~# _col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
3 T* ?7 n# }8 n0 s1 `7 e# ^col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))
- C/ u, b( T: c9 W! H# m. X rcol_vec <- as.vector(col2) #转换成字符向量
0 ]0 M+ |$ }. U0 Xcol_num <- as.numeric(col2) #转换成数字向量6 |5 U$ S( f7 K; S
col3 <- factor(colour, levels = c('G', 'R'))$ J. h# x+ M. G2 f/ D0 t) {! f
7 ^0 j+ C7 C6 h! K' _. R
2、创建一个有序因子。, `2 h& x4 a9 \* [' h- w/ D
例1:score <- c('A', 'B', 'A', 'C', 'B')- x8 |/ w0 X6 I7 v$ n1 S v
score1 <- ordered(score, levels = c('C', 'B', 'A')); score1
8 m# ?% v, n4 m9 c" c( X' R2 V3 V" O- k5 G3 f3 U
3、用cut()函数将一般的数据转换成因子或有序因子。" o- P7 x/ t3 O$ J6 c
例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, ( t' _7 O" H9 U% i" L/ X$ I2 D
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)3 n1 I4 I' [$ s' }2 `* E: B- x
exam1 <- cut(exam, breaks = 3) #切分成3组& O5 c" _- W0 k+ |7 O. ]- w |
exam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组- W! H3 r0 |% k- A6 D
attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')/ |, W1 R; ~4 Z
ordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子
; I& n3 A0 x. |- j# h7 H' I6 t. M3 f) n8 |
6 M. K' {5 @* S
|
zan
|