QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3512|回复: 0
打印 上一主题 下一主题

R语言入门基础之因子和有序因子

[复制链接]
字体大小: 正常 放大

320

主题

15

听众

1335

积分

升级  33.5%

  • TA的每日心情
    奋斗
    2013-6-15 16:58
  • 签到天数: 24 天

    [LV.4]偶尔看看III

    群组第四届数学中国美赛实

    跳转到指定楼层
    1#
    发表于 2012-12-24 14:02 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta |邮箱已经成功绑定

    因子(factor)和有序因子(ordered factor)

    因子用来存储类别变量(categorical variables)和有序变量,这类变量不能用来计算而只能用来分类或者计数。
    $ V" }5 `1 D3 ^, g. f5 j' G因子表示分类变量,有序因子表示有序变量。& H  t: h  t3 Z/ c- i6 D6 @9 Q! f
    生成因子数据对象的函数是factor(),语法是factor(data, levels, labels, ...),其中data是数据,levels是因子水平向量,labels是因子的- ?4 P) c* O9 z7 p4 B! X
    9 `5 w' B1 M& j. H7 V& y0 D8 B9 h
    标签向量。
    1 h7 O2 o0 x2 }: H) A  x+ R0 B+ F1、创建一个因子。; {4 x: {1 v% ~
       例1:colour <- c('G', 'G', 'R', 'Y', 'G', 'Y', 'Y', 'R', 'Y')* y+ W+ ~; C2 a, t
    col <- factor(colour)4 J; _  H2 `+ |% B5 R$ d0 J- |8 n
    col1 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('Green', 'Red', 'Yellow')) #labels的内容替换colour相应位置对应levels的内容; N( a) z' P/ k9 W) v: k7 ]
    col2 <- factor(colour, levels = c('G', 'R', 'Y'), labels = c('1', '2', '3'))
    1 j, Q# p& w$ Q* k: z; mcol_vec <- as.vector(col2) #转换成字符向量
    : R& ]# m: Z9 G( Q, jcol_num <- as.numeric(col2) #转换成数字向量
    ) M+ t4 ?! V0 c' E2 {0 ~col3 <- factor(colour, levels = c('G', 'R'))
    & J; y) ?6 N. d; a3 [# a& y( ^# M/ [; z7 X/ l" d: Y6 D& Y
    2、创建一个有序因子。
    ! s3 Q6 Y4 W7 L2 ^! _( L8 g    例1:score <- c('A', 'B', 'A', 'C', 'B')
    9 O) L1 Q2 C/ p- Y$ [- Oscore1 <- ordered(score, levels = c('C', 'B', 'A')); score1
    5 X# b' Z2 l9 l! e. D/ C2 L! `0 g0 j  g- @! a
    3、用cut()函数将一般的数据转换成因子或有序因子。+ V2 r; Z( f( \7 m& m5 C
        例1:exam <- c(98, 97, 52, 88, 85, 75, 97, 92, 77, 74, 70, 63, 97, 71, 98, * T) s9 C$ L4 y& z8 P7 q
      65, 79, 74, 58, 59, 60, 63, 87, 82, 95, 75, 79, 96, 50, 88)) V5 s1 }' A( g8 `& y
    exam1 <- cut(exam, breaks = 3) #切分成3组! m- D, ^! m/ B( |, p$ ^
    exam2 <- cut(exam, breaks = c(0, 59, 69, 79, 89, 100)) #切分成自己设置的组
    # l0 J, d& l4 ^( u. lattr(exam1, 'levels'); attr(exam2, 'levels'); attr(exam2, 'class')
    1 |# m0 O, f) s9 m, Q5 ~% Wordered(exam2, labels = c('bad', 'ok', 'average', 'good', 'excellent')) #一个有序因子
    . x3 m( A# K* I, e' o/ e- [7 d+ ~4 p% ?5 u0 q2 L

    1 K7 x: O6 B5 r8 T( q
    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2025-7-26 11:22 , Processed in 0.340494 second(s), 53 queries .

    回顶部