- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。+ o/ m8 T5 D& l- d6 q f
因子表示分类变量,有序因子表示有序变量。' R& w" S2 I9 A' R% p
生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的8 F8 I4 R0 }' P' u5 J Q" Z
8 x6 d! v |! k) T+ g) j' F标签向量。5 V( Q% s4 j. [, j' @. U
1、创建一个因子。$ v/ n1 W* d7 h9 a$ O- w% |
例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')" ?. p2 v( @! O3 X+ ]. x3 h
col <- factor(colour)
" d* |4 l/ M, h/ y! \1 d6 Icol1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容0 H$ b0 B' V0 d- U# X! c
col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))" v) M9 h. Y5 W, m+ K3 X
col_vec <- as.vector(col2) #转换成字符向量/ G; n3 g9 @2 S
col_num <- as.numeric(col2) #转换成数字向量
/ V7 j2 f m/ }" y6 j! u; E( K% Acol3 <- factor(colour, levels = c('G', 'R'))
6 x, l( U; X: n e' j" h! z, z7 G/ f
2、创建一个有序因子。$ W4 c" Q/ S' l
例1:score <- c('A', 'B', 'A', 'C', 'B')! M/ R, v; e# X1 V* |6 D4 g+ L
score1 <- ordered(score, levels = c('C', 'B', 'A')); score1
/ G. F+ ]; X. d% ]' U3 Y/ Y
0 s, z, O1 @" `/ F% m0 i3、用cut()函数将一般的数据转换成因子或有序因子。
) a- k/ y2 T j. Y' u 例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98,
: X& ^3 C' T/ A8 q8 u# \ 65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
+ [. _6 d. K( |exam1 <- cut(exam, breaks = 3) #切分成3组' [ G- k0 R0 e `$ u* I
exam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组5 O0 U- }& O" C
attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
! N9 R1 j8 s/ a; vordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子
; A! w/ O( g5 W6 A- T& ]$ P
$ e1 [- {# m% L0 t G
- w) v4 M4 f6 s7 p( ~5 [ |
zan
|