练习

• 1. 编写 for 循环来：
  • a. 计算 mtcars 每一列的均值。
  • b. 确定 nyc flights13::flights 中每一列的类型。
  • c. 计算 iris 每一列中唯一值的数量。
  • d. 为 μ = –10、0、10 和 100 分别生成 10 个随机正态数。
    • 在开始编写循环之前，先思考输出、序列和循环体。
• 2. 通过利用现有的可作用于向量的函数，消除以下每个示例中的 for 循环：

out <- "" for (x in letters) { out <- stringr::str_c(out, x) } x <- sample(100) sd <- 0 for (i in seq_along(x)) { sd <- sd + (x[i] - mean(x)) ^ 2 } sd <- sqrt(sd / (length(x) - 1)) x <- runif(100) out <- vector("numeric", length(x)) out[1] <- x[1] for (i in 2:length(x)) { out[i] <- out[i - 1] + x[i] }

• 3. 结合你的函数编写和 for 循环技能：
  • a. 编写一个 for 循环，用 print() 输出儿歌《Alice the Camel》的歌词。
  • b. 将童谣《Ten in the Bed》（床上十个小孩）改写为一个函数。将其泛化为适用于任意睡觉结构中任意人数的版本。