- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。) E- v7 k9 b! z+ E7 [8 f% k
因子表示分类变量,有序因子表示有序变量。( s; H& Y. ]2 ~0 I/ H. W! r
生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的
7 n. W) f/ _/ E+ ^: I. q% q5 I- y3 O: d0 o* P
标签向量。6 f- W4 ^' W4 ?/ R1 c, b" e
1、创建一个因子。
M4 q. G! l: f( v5 A0 T 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')
5 i" ?3 S9 ^/ D/ S3 |col <- factor(colour)4 n# e9 I+ R; |; g2 L) [4 {
col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容2 f3 s0 a! G) e8 g# Z3 C
col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))
. \' o& w; j( Z; ^- W" v. [# c* J9 Pcol_vec <- as.vector(col2) #转换成字符向量
7 p' N) N$ I2 u$ x/ i8 }& {# @8 x! Gcol_num <- as.numeric(col2) #转换成数字向量
" r1 Q8 `* Q% ocol3 <- factor(colour, levels = c('G', 'R'))7 w9 e x' @7 m% u6 M4 D: Z5 w
2 v% z# O/ T# W# A3 |
2、创建一个有序因子。! B+ M4 W" ?" Z; T
例1:score <- c('A', 'B', 'A', 'C', 'B')
# F& ^1 ~5 G5 w9 `/ \- ]2 ?score1 <- ordered(score, levels = c('C', 'B', 'A')); score1. i/ a, t. |* \7 p c, l! h
+ i4 s% a# M, D" E5 f# \) v
3、用cut()函数将一般的数据转换成因子或有序因子。 V7 _' o) L7 ^* q
例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, . l) n* \+ w9 w: y) Z
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
+ C. [' O T3 qexam1 <- cut(exam, breaks = 3) #切分成3组
1 W8 U' m0 n# Gexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
) b" u$ N- H: K0 t* [- Pattr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
3 C% v) e5 k W, d Qordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子
3 P! z! p" k8 f9 P4 j0 C, h
' V0 t7 H2 E# A: a/ h D9 n
7 |1 p! z( ?- [+ }* a9 C' x |
zan
|