- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。2 w+ C, \* Z1 o) J) G
因子表示分类变量,有序因子表示有序变量。
& V* A6 M1 ]4 q8 g- e4 r生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的
0 t- U1 |* \" f2 I* h; }7 W
. q6 |& N" G3 A' V7 L; F4 R6 S标签向量。
9 p1 l# ^- k) N9 s# \# ?1、创建一个因子。
$ _, }9 j K4 r; T. H! ^3 K8 y% o$ m 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')
6 Z* s3 W/ h5 g5 o7 j+ scol <- factor(colour)0 U* ~# T0 K! C7 Q) o
col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容5 u! R, |6 x3 |, C( e
col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))
" \1 e. K+ W/ Y* \. ecol_vec <- as.vector(col2) #转换成字符向量
0 s* u# B3 C- E0 e* w7 h: D) tcol_num <- as.numeric(col2) #转换成数字向量* O2 D$ }& s; X0 v* \8 R, _$ s
col3 <- factor(colour, levels = c('G', 'R'))
5 m- v: C5 l7 d' v2 a
' b1 s' x% t: H A- g9 E8 O2、创建一个有序因子。 u! X$ O$ A& p
例1:score <- c('A', 'B', 'A', 'C', 'B')( a! {) M6 v$ U& }: h, z. G
score1 <- ordered(score, levels = c('C', 'B', 'A')); score1
: d0 e, b3 L; c( h1 D1 {
, N- p; @: g& A9 |3、用cut()函数将一般的数据转换成因子或有序因子。
' B4 d. r4 f# G5 B4 U# C/ n 例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, ; Y* |2 h! i( K, O/ F
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)( g, k4 @1 I2 V% F
exam1 <- cut(exam, breaks = 3) #切分成3组
: D. ` Q; j, t7 z* l7 H0 o. R" s4 w5 s Rexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组: v, r' n: s( a1 D
attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
. }7 Q& Q- C/ m ~ordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子( ~9 @5 S: f9 D/ f. G
3 i6 E& I8 ]( u# H7 j
- v! J1 X, |" u4 k3 e( v |
zan
|