- 在线时间
- 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)和有序变量,这类变量不能用来计算而只能用来分类或者计数。, ^; w9 K' Y5 P) b! V! T+ u
因子表示分类变量,有序因子表示有序变量。
% z$ D* X! _+ \& L生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的& T# U% E: c3 N/ g7 [5 I! u
6 N. j8 D3 n+ F' t; p/ ]+ H. c标签向量。
# a8 F. Y6 x. e; c" |7 q A; q1、创建一个因子。
8 }. d$ ?& K6 ?" Y- s+ w( O 例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')1 K5 L5 k& D% y* H- Q1 Z# \1 d. e
col <- factor(colour)
' i8 @; w2 j8 J: h. ~8 ? qcol1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容
8 D9 t& W! E% H/ _; Dcol2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))" @# v0 U8 d$ Q2 j$ R5 w
col_vec <- as.vector(col2) #转换成字符向量
0 L {: K1 Y. t- g( Lcol_num <- as.numeric(col2) #转换成数字向量
- g6 I# R& c+ e' M; e% bcol3 <- factor(colour, levels = c('G', 'R')); y! C/ g9 E: ~+ c' M7 @8 r
, P I, ~ u8 f% ?$ I& b* W
2、创建一个有序因子。
" n+ H. b$ F0 u9 ^# k 例1:score <- c('A', 'B', 'A', 'C', 'B')
o+ [; ~. i( Yscore1 <- ordered(score, levels = c('C', 'B', 'A')); score1. H6 G/ ?* U ~; q6 R/ a& {
( \9 @# z$ F2 \# v) q( d! }
3、用cut()函数将一般的数据转换成因子或有序因子。, n+ M; T' W, N) [9 ?
例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, ' R0 N8 Q6 ^& V! m3 U
65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)6 m5 F9 d' k* h1 p9 d& ]. _
exam1 <- cut(exam, breaks = 3) #切分成3组
3 E) _6 Z. d4 t, r6 gexam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组. C) w8 \( A' d$ i! Y
attr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
# \4 K0 p, x+ ~, J$ jordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子# j0 f8 b5 Y3 h" f; V
# i9 b: ]- n! P2 P# b% }" z! P
/ }% z$ e g7 ]& _4 ] |
zan
|