R数据科学 16.5.3练习题

(1) 编写代码以使用一种映射函数完成以下任务。

a. 计算 mtcars 数据集中每列的均值。

b. 确定 nycflights13::flights 数据集中每列的类型。

c. 计算 iris 数据集中每列唯一值的数量。

d. 分别使用 μ= -10、0、10 和 100 的正态分布生成 10 个随机数。

复制代码
library(purrr)
# 计算 mtcars 每列的均值
mean_mtcars <- map(mtcars, mean)
# 确定 flights 数据集中每列的类型
column_types <- map(flights, class)
# 计算 iris 数据集中每列的唯一值的数量
unique_count <- map(iris, ~ length(unique(.)))
# 使用不同的均值生成 10 个随机数
random_numbers <- map(c(-10, 0, 10, 100), ~ rnorm(10, mean = .))

(2) 如何建立一个向量来表明数据框中的每一列是否为一个因子?

复制代码
# 建立一个向量表明每列是否为因子
is_factor <- map_lgl(iris, is.factor)

(3) 如果在非列表向量上使用映射函数,那么会发生什么情况? map(1:5, runif) 的作用是什么?为什么?

输出将是一个列表,其中包含不同长度的随机数向量。

map(1:5, runif) 会为向量 1:5 中的每个元素执行 runif() 函数,并生成相应数量的随机数。

(4) map(-2:2, rnorm, n = 5) 的作用是什么?为什么? map_dbl(-2:2, rnorm, n = 5) 的作用又是什么?为什么?

复制代码
map(-2:2, rnorm, n = 5)

该语句对 -2:2 进行映射,并对每个值执行 rnorm(n = 5, mean = x),即生成均值为 -2、-1、0、1 和 2 的 5 个正态分布随机数。每次生成的结果是一个包含 5 个随机数的列表,每个元素对应不同的均值。

复制代码
map_dbl(-2:2, rnorm, n = 5)

map_dbl() 会尝试将结果强制为数值向量,但由于 rnorm() 返回的是一个向量,map_dbl() 无法处理,所以会抛出一个错误。map_dbl() 适用于返回单个数值的函数,而不是返回向量的函数。

(5) 重写 map(x, function(df) lm(mpg ~ wt, data = df)) 这段代码,去除匿名函数。

复制代码
# 定义一个具体的函数  
fit_model <- function(df) {  
  lm(mpg ~ wt, data = df)  
}  
  
# 使用 map 调用这个函数  
result <- map(x, fit_model)
相关推荐
wearegogog1235 分钟前
C#与Twincat 2 实现上位机控制软PLC功能
开发语言·c#
军训猫猫头36 分钟前
12.NModbus4在C#上的部署与使用 C#例子 WPF例子
开发语言·c#·wpf
Eiceblue1 小时前
使用 C# 设置 Excel 单元格格式
开发语言·后端·c#·.net·excel
正义的大古1 小时前
OpenLayers数据源集成 -- 章节八:天地图集成详解
开发语言·javascript·ecmascript·openlayers
zhangfeng11332 小时前
R geo 然后读取数据的时候 make.names(vnames, unique = TRUE): invalid multibyte string 9
开发语言·chrome·r语言·生物信息
Sally璐璐2 小时前
Go组合式继承:灵活替代方案
开发语言·后端·golang
zzzsde2 小时前
【c++】类和对象(4)
开发语言·c++
码熔burning2 小时前
从 new 到 GC:一个Java对象的内存分配之旅
java·开发语言·jvm
晨非辰2 小时前
#C语言——刷题攻略:牛客编程入门训练(十二):攻克 循环控制(四)、循环输出图形(一),轻松拿捏!
c语言·开发语言·经验分享·笔记·其他·学习方法·visual studio
gou123412342 小时前
Go语言io.Copy深度解析:高效数据复制的终极指南
开发语言·golang·php