- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。* n( R9 U+ M. z8 V* g
因子表示分类变量,有序因子表示有序变量。1 e" ?, X6 z( n
生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的# @ {1 m$ j& o# `& }& B6 B6 Y
$ V# p' _# h, W ~. |
标签向量。, b5 ^2 P5 u% q; ~ q" i% y
1、创建一个因子。
4 l: C1 i# K. i( {: P- {. V4 d" Z 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')
6 g( g. R% F# ~# rcol <- factor(colour)7 o. _! u: P3 P# s8 Q1 i; D/ f
col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
7 n6 E4 m3 Q2 n/ q- k2 q3 _' acol2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))- D2 T2 o% H6 V* c+ {
col_vec <- as.vector(col2) #转换成字符向量
! A9 B* A" I/ J; O$ ?7 _0 h% J7 Ncol_num <- as.numeric(col2) #转换成数字向量
2 [4 G9 `. j$ ^1 Ncol3 <- factor(colour, levels = c('G', 'R'))
, k9 ]& D5 v, P
- O5 S9 t3 y X2、创建一个有序因子。$ P- X; r9 {* E) }% d
例1:score <- c('A', 'B', 'A', 'C', 'B')
; t* \8 ?% g& p) i0 {$ {score1 <- ordered(score, levels = c('C', 'B', 'A')); score1
4 Z" F$ Z6 F y T+ L
) \! \% j2 T% P3 M; F3、用cut()函数将一般的数据转换成因子或有序因子。3 J8 W: n$ ^! g! n2 s) B7 _
例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, , J3 u7 G' @- s$ T' q
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)2 I+ y2 w5 Z+ o% e% j
exam1 <- cut(exam, breaks = 3) #切分成3组
$ A3 ] P" ]6 v& U* Texam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
H8 q, V; {' b$ X/ }attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')3 Z+ R$ z- c( ]0 }7 G3 K% a+ q
ordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子1 A9 F4 U: f4 n$ U) S
; f9 p" y0 I j% V. j
" r3 _2 K, \+ X |
zan
|