- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。
. {% ~; A7 \: }( I8 y. _因子表示分类变量,有序因子表示有序变量。
" H) a# p, X( s! `7 L( v- [; A, B生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的+ O4 X% L0 g6 n& R2 L/ K
8 O) P$ D& M9 O% [3 `( @
标签向量。
. p1 f) ~% Q; c+ k U1、创建一个因子。
6 b4 B( h. i( L$ t 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')* c. y- @1 y4 {+ j5 Y! z* m
col <- factor(colour)
+ `$ s8 k- L/ r2 S# q2 Pcol1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
% h2 W' `. ^$ w% s- Y+ Qcol2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))% F2 Q) c: {3 `9 V# q
col_vec <- as.vector(col2) #转换成字符向量# q$ T3 G" L0 Y6 t/ N' n4 P H
col_num <- as.numeric(col2) #转换成数字向量0 y5 O, @# u, B4 H2 T
col3 <- factor(colour, levels = c('G', 'R'))' z1 L; d- \" ~6 D9 U3 A
( [0 { \# S8 F9 w4 D2、创建一个有序因子。 j t' B' Y0 Y3 P+ e
例1:score <- c('A', 'B', 'A', 'C', 'B')
/ }) M8 ?6 `$ X {0 e9 Y ^8 J4 X3 Gscore1 <- ordered(score, levels = c('C', 'B', 'A')); score1, K, J ~! ]% y
% T- v, H1 _8 o$ d3、用cut()函数将一般的数据转换成因子或有序因子。
7 [8 q4 d, R* j* x3 m' G- S 例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98,
6 X" q) l3 H! h' o 65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)
' [0 F0 U" }& Q i+ ?% C. Kexam1 <- cut(exam, breaks = 3) #切分成3组
$ x3 D2 O3 m$ v4 J! i2 Iexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
2 c+ ?5 i. M! V$ O) Rattr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')( W( U1 f# u; |& v
ordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子
" F- k6 U4 ]) h' w1 ~5 |
4 v! Y# O) M; N0 S& T% y7 {
* @- a& V" Y$ V+ v& m- [4 H |
zan
|