- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。
! b0 i9 C, E% O: o! I8 Y- @因子表示分类变量,有序因子表示有序变量。
- a9 B z$ ?6 X8 `- a( v; L生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的- V# ^0 H9 M0 |: p
9 @4 S, _$ K3 g3 `% O$ C标签向量。
' R0 z( z6 h, A- W( L5 e1、创建一个因子。7 H+ z* V R% a2 J8 a
例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')
: D% Z6 j$ o9 Y; acol <- factor(colour)
. G# { m9 i' t0 [% E+ _col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容8 j; e& [' f! R: r; d% }
col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))3 `9 V Y- [6 w d
col_vec <- as.vector(col2) #转换成字符向量9 ]6 W. w( x* U U; ?
col_num <- as.numeric(col2) #转换成数字向量
' Y( X) Z. F1 W$ R5 E% l& H5 b1 acol3 <- factor(colour, levels = c('G', 'R'))! ^9 w* a) T! G) \- ^: j
1 P+ C9 S) F$ m5 i/ ?- J
2、创建一个有序因子。" o2 z# H$ C. ~" ?9 x
例1:score <- c('A', 'B', 'A', 'C', 'B')( L% l3 F) |% C' Q0 R+ ^* n5 T2 ^
score1 <- ordered(score, levels = c('C', 'B', 'A')); score1
4 Q9 Z4 Y* U/ v/ _% r& l" O
, X5 g1 i, o8 w P2 a* w* K0 m3、用cut()函数将一般的数据转换成因子或有序因子。) z5 r& K5 K7 Q3 ~6 ]* [7 R
例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, 5 l1 Z" N9 Y0 _7 d! D9 E+ h
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
( ?6 u, V) F( ]: bexam1 <- cut(exam, breaks = 3) #切分成3组
! C k5 N2 u* H# U$ uexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
+ `1 x9 ]# W6 L& z5 [attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')8 ?/ a* m6 Y1 N8 Q3 A6 N7 P
ordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子) P0 T$ r# v }5 L/ f8 B9 a# K4 T
; q) W, r6 U; u1 S
' r U; q0 X j, x$ Q
|
zan
|