- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。
1 \6 v1 s, q0 S" \3 K; ~* S0 G因子表示分类变量,有序因子表示有序变量。" l% }5 F. O6 s* |
生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的
1 b8 g# p3 ~1 p$ I5 v9 B8 P n) b
u" F! w9 h& c7 P& d标签向量。* A/ N% \+ o9 _/ Z$ ^9 j @, B
1、创建一个因子。
/ S; E8 }/ V) @8 R1 C 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')
8 _3 [* C' t+ Y/ t" U! I8 w9 _col <- factor(colour)
+ G0 B" L& Z, s0 rcol1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
- r+ E: x. I1 y% e1 G: R' Qcol2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))
+ X+ g( r* I( o& ecol_vec <- as.vector(col2) #转换成字符向量
" [5 W% ]( X* X( H. ucol_num <- as.numeric(col2) #转换成数字向量3 n# f- ?! E: f. B! H& J2 m) m7 `
col3 <- factor(colour, levels = c('G', 'R'))
9 J y$ n2 `- e, R1 X% j; L+ w, v
' i' [. P/ N9 c. Y: D2、创建一个有序因子。
4 q- {4 @4 U. \$ T: O3 ] 例1:score <- c('A', 'B', 'A', 'C', 'B')
8 g8 |3 W6 U1 n: Wscore1 <- ordered(score, levels = c('C', 'B', 'A')); score16 [6 n, |- U8 i& H, k& M9 H( ^
) M) T+ c% b, U4 ^. Z9 l7 M3、用cut()函数将一般的数据转换成因子或有序因子。
& M8 N* m( j; D& Q5 u$ Q# v 例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98,
' O6 v- B! q9 Z 65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
8 v4 |+ J. `; Sexam1 <- cut(exam, breaks = 3) #切分成3组
' n5 {. B# ~/ ?5 T8 }1 }! G! yexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
) Q/ W( ]6 a4 h' S2 Hattr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
0 \# ^1 Q( S7 p" r8 v% xordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子+ k0 K3 Z$ m, Q# O; y7 E
% q! y0 h4 T! h0 B; T6 V
! e; w# N* g3 L9 Y* S' f |
zan
|