- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。
, f. H' l/ \0 i+ B2 b. w因子表示分类变量,有序因子表示有序变量。
- N o4 [6 A: ?$ @) O, U/ ~8 a$ c生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的
2 }$ r- I% r- d5 y
/ E8 }6 d- q1 D4 w! a/ ^标签向量。! t5 M' ^5 @# J' w4 H
1、创建一个因子。7 T! N1 o' b- ^0 k
例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')
5 N& r$ f: k: {, H6 pcol <- factor(colour)
) }* c+ V" E0 }# Q0 O- q: gcol1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
7 U1 b- I5 G/ O4 V) _col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))2 z; H! z1 q& T7 O6 o
col_vec <- as.vector(col2) #转换成字符向量* i5 ~) G' l4 t1 j( _# y& W c( P
col_num <- as.numeric(col2) #转换成数字向量
8 D$ T4 U& M% X: rcol3 <- factor(colour, levels = c('G', 'R'))
$ X# K2 v5 v8 X0 @$ f8 Y4 {2 b: S2 n3 N! M
2、创建一个有序因子。
1 \/ i1 M8 d6 }5 T5 D3 @: m 例1:score <- c('A', 'B', 'A', 'C', 'B')
( r8 c0 ^; T3 |' \- H( Pscore1 <- ordered(score, levels = c('C', 'B', 'A')); score1$ u7 W! ~5 C- {
; Q- I$ W* f& v3 x( E
3、用cut()函数将一般的数据转换成因子或有序因子。
7 j( Y2 [6 W9 _1 }! n e9 X 例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98,
9 O# m) j2 D' r& U1 U: k 65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
$ H1 a" U; p# Z# J6 eexam1 <- cut(exam, breaks = 3) #切分成3组
" k# ]) x/ D. V9 o8 t( @9 cexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组5 ^, \- A" s' O! ?; p0 M! n% [
attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
( i# G- r& j6 y& m) iordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子
( S/ `& w; e7 Q: V, j7 F5 T
& T; }0 B# Y0 Y. Q% x
7 R- v6 L1 Y3 P3 W% ~, ?* _- q |
zan
|