9.10　知识测试：练习

• 练习9-1

遍历名人Wayans家族中的儿童列表。Wayans家庭中每一代人有多少个儿童？

wayans <- list( 
"Dwayne Kim" = list(), 
"Keenen Ivory" = list( 
    "Jolie Ivory Imani", 
    "Nala", 
    "Keenen Ivory Jr",
    "Bella", 
    "Daphne Ivory" 
), 
Damon = list( 
    "Damon Jr", 
    "Michael", 
    "Cara Mia", 
    "Kyla" 
), 
Kim = list(), 
Shawn = list( 
    "Laila", 
    "Illia", 
    "Marlon" 
), 
Marlon = list( 
    "Shawn Howell", 
    "Arnai Zachary" 
), 
Nadia = list(), 
    Elvira = list( 
    "Damien", 
    "Chaunté" 
), 
Diedre = list( 
    "Craig", 
    "Gregg", 
    "Summer", 
    "Justin", 
    "Jamel" 
), 
Vonnie = list() 
)

[5]

• 练习9-2

state.x77是R提供的一个数据集，它包含了关于美国各州的人口、收入和其他信息。输入它的名字就可以看到它的值，和你自己创建数据集一样：state.x77

• 使用你在第三章学到的方法检查数据集。
• 计算出每一列的平均值和标准差。

[10]

• 练习9-3

回顾本章前面部分介绍的time_for_commute函数。计算在75%位数的上下班时间，按不同的交通工具分组：

commute_times <- replicate(1000, time_for_commute()) 
commute_data <- data.frame( 
time = commute_times, 
mode = names(commute_times) 
)

[5]