- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。0 e x9 x. |) D: C: N9 ^
因子表示分类变量,有序因子表示有序变量。! m) n1 N4 Z% X; s
生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的
' O( c0 `5 \# I$ ?0 E
+ P+ U- v# @9 P) ^0 U7 z8 x标签向量。
, y) l) L$ y0 a: h7 g# j1、创建一个因子。
1 ]$ j) T; V3 y/ u- l 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')% W* _! f9 Q7 P7 m* s( u( l) N
col <- factor(colour)
& K, s6 g9 N3 v! @# w, M( {. S/ Lcol1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
& ]- X/ u. l! Q; L" `% M1 Xcol2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))
3 U- _0 W% G$ C' d! jcol_vec <- as.vector(col2) #转换成字符向量, R3 o) L- J; T
col_num <- as.numeric(col2) #转换成数字向量* P3 m3 a L% _4 d
col3 <- factor(colour, levels = c('G', 'R'))5 w. T5 O9 x: v2 E( g
( b- _' A1 T' j6 e
2、创建一个有序因子。6 Q; [+ ?* K8 A: z# q: A0 a5 D
例1:score <- c('A', 'B', 'A', 'C', 'B')9 x5 r, j- {% }6 k9 w, w; m
score1 <- ordered(score, levels = c('C', 'B', 'A')); score1 ^7 U" P/ z/ M7 k
1 g2 x1 t1 o! E" a& [3、用cut()函数将一般的数据转换成因子或有序因子。( Y8 |2 u& O( _ F) t2 M
例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, ; `6 x) m! d |
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
. _8 |. n& O @2 xexam1 <- cut(exam, breaks = 3) #切分成3组! h/ w" ?( h" P. H& M/ N4 |
exam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
# a+ r8 c M1 A2 uattr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
) \2 P& P4 O9 S8 B [% zordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子& a# b+ ]( v1 P+ j# X# K
* {/ T8 D$ E+ [( _# u% z
$ o; v1 r& h# s8 a4 I7 d |
zan
|