<< トップページへ

<< 目次へ

最終更新日 : 2008.11.18

factor()の使い方



数値(numeric)が格納されているベクトルに対して、それをカテゴリカル型に変換する:

> group <- c(1, 1, 1, 1, 2, 2, 2, 2)
> group <- as.factor(group)
> group
[1] 1 1 1 1 2 2 2 2
Levels: 1 2


数値(numeric)が格納されているベクトルに対して、それを「任意の文字」にしてカテゴリカル型に変換する:

> group2 <- rep(c(1, 2), c(4, 4))
> group2 <- factor(group2, levels=c(1, 2), labels=c("male", "female"))
> group2
[1] male   male   male   male   female female female female
Levels: male female


文字(character)が格納されているベクトルに対して、それをカテゴリカル型に変換する:

> group3 <- rep(c("Yes", "No"), c(3, 3))
> group3 <- factor(group3, levels=c("Yes", "No"))
> group3
[1] Yes Yes Yes No  No  No 
Levels: Yes No



rep()の使い方

# 基本的なやり方
> rep(c(1, 2, 3), c(5, 5, 5))
 [1] 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3

# 上のやり方の応用。
> rep(1:3, rep(5, 3))
 [1] 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3

---

# 基本的なやり方
> rep(1:3, 5)
 [1] 1 2 3 1 2 3 1 2 3 1 2 3 1 2 3

# 上のやり方の応用
> x <- c("before", "1h", "3h")
> rep(x, 5)
 [1] "before" "1h"     "3h"     "before" "1h"     "3h"     "before" "1h"    
 [9] "3h"     "before" "1h"     "3h"     "before" "1h"     "3h"