R 语言经典实例（原书第 2 版）

统计概论

｜

227

mean(diff(ts)> 0)

时间序列中大于前一个观测值的观测值所占的比例

9.3 因子数据的表格和列联表创建

9.3.1 问题

你需要将一个因子呈现为表格或根据多个因子构建列联表。

9.3.2 解决方案

函数 table 产生一个因子的计数：

table(f1)

#> f1

#> a b c d e

#> 14 23 24 21 18

它还可以根据两个或多个因子生成列联表（交叉表）：

table(f1, f2)

#> f2

#> f1 f g h

#> a 6 4 4

#> b 7 9 7

#> c 4 11 9

#> d 7 8 6

#> e 5 10 3

9.3.3 讨论

函数 table 也适用于字符串，而不仅仅是因子：

t1 <- sample(letters[9:11], 100, replace = TRUE)

table(t1)

#> t1

#> i j k

#> 20 40 40

函数 table 计算一个或多个因子的水平，例如因子 initial 和因子 outcome 的水平计数：

set.seed(42)

initial <- factor(sample(c("Yes", "No", "Maybe"), 100, replace =

TRUE))

outcome <- factor(sample(c("Pass", "Fail"), 100, replace = TRUE))

table(initial)

#> initial