热门标签 | HotTags
当前位置:  开发笔记 > 编程语言 > 正文

Rpurrr(二)

在接下来,我们将学习和使用purrr包,它提供的很多函数可以替代很多常见的for循环的应用。R基础包的应用函数组(apply,lapply,tapply等)也可以完成类似的任务,但

在接下来,我们将学习和使用purrr包,它提供的很多函数可以替代很多常见的for循环的应用。R基础包的应用函数组(apply, lapply, tapply等)也可以完成类似的任务,但是purrr包的函数更一致,也更利于学习。

使用purrr函数代替for循环的目的是将常见的列表的处理问题分解为独立的几个部分

  • 1 对于列表中的单个元素,你能找到解决问题的方法吗?如果找到了解决方法,那么你就可以使用purrr将这种方法拓展到列表中的所有元素
  • 2 如果你面临着非常复杂的问题,那么如何将它们几个可行的子问题,然后循序渐进的解决,直至完成最终的解决方案?使用purrr,你可以解决很多子问题,然后通过管道操作将这些问题的结果组合起来。
映射函数

我们在R里面的进行的for循环,通常是先对向量进行循环,然后对其每个元素进行一番处理,最后保存结果。,这种模式太普遍,purrr包提供了一系列的函数来完成这种操作。每种类型的输出都有一个相应的函数。

  • map()输出列表 list
  • map_lgl()输出逻辑型向量 vector
  • map_int() 输出整型向量 vector
  • map_dbl() 输出双精度型向量 vector
  • map_chr() 输出字符型向量 vector
    每个函数都使用一个向量作为输入,并对向量的每个元素应用一个函数,然后返回和输入向量相同的长度的一个新向量。向量的类型由映射函数的后缀决定。

一旦掌握了这些函数,你就会发现可以在解决迭代问题时节省大量时间。但你无须因为使用了for循环,没有使用映射函数而感到内疚。映射函数是一个高度抽象,需要花费很长时间才能理解其工作原理。重要的事情的是解决遇到的问题,而不是写出最优雅的代码(尽管肯定也要为之努力)
可能有些人会说,不要使用for循环,因为它们很慢,这些人完全错了!(因为for循环已经很多年都不慢了)。 使用map()函数的主要优势不是速度,而是简洁:它们可以让你的代码更易编写,也更易读。

因此,我们可以改写for循环的操作。因为那些函数返回的为双精度数,所以我们需要使用map_dbl()函数.

  • map_dbl(df, mean)
  • map_dbl(df, median)
  • map_dbl(df, sd)
    映射函数的重点是需要map匹配的函数,该函数也就是我们需要进行的操作。

如果使用管道工具,这一点就更加明显

  • df %>% map_dbl(mean)
  • df %>% map_dbl(median)
  • df %>% map_dbl(sd)
    map_*系列函数与for循环函数具有以下区别:
  • 所有的purrr函数均是用C实现的,这使得他们的速度非常快。
  • 第二个参数(.f ,是要应用的函数),可以是一个公式、一个字符向量或一个整型向量
  • map_*() 使用…向.f传递一些附加参数,供其每次调用时使用。

插播体会group_by函数和split函数区别
split函数返回的对象为各个分类对象组成的list对象,而purrr通常要求输入对象为list。因此,split分组函数常和purrr函数搭配

切分变量函数中, 必须加上mtcars$或者用.$,否则会报错

mtcars%>%
split(mtcars$cyl)
# 切分变量函数中, 必须加上mtcars,否则会报错

《R purrr(二)》 image.png

如下:该结果必须要由list来接受output

mtcars%>%
split(.$cyl) %>%
map(function(df) lm(mpg~wt, data=df))

《R purrr(二)》 image.png

因为R中创建匿名函数的语法比较繁琐,所以purrr提供了一种更加方便的快捷方式——单侧公式:

mtcars%>%
split(.$cyl) %>%
map(~lm(mpg~wt, data=.))

我们在上面使用了.作为一个代词:它表示当前的列表元素(与for循环中用i表示当前索引是一样的)

当检查多个模型时,有时你会需要提取出像R方这样的摘要统计量。要想完成这个任务,需要先运行summary()函数,然后提取结果中r.squared. 我们可以使用匿名函数的快捷方式来完成这个操作.

models=mtcars%>%
split(.$cyl) %>%
purrr::map(~lm(wt~mpg,data=.))
models%>%
purrr::map(summary)%>%
purrr::map_dbl(~.$r.squared)

因为提取命名成分的这种操作十分常见,所以purrr提供了一种更为简洁的快捷方式:使用字符串

models%>%
purrr::map(summary)%>%
purrr::map_dbl("r.squared")

当输入对象为data.frame时,每一列为一个变量,相当于for循环中的i

例如:计算iris中每列唯一值的数量


iris%>%
map(function(df) length(unique(df)))
iris%>%
map_df(~length(unique(.)))

To generate 10 random normals for each of μ=−10, 0, 10, and 100: The result is a list of numeric vectors.
使用单侧函数,前面一定要加~,每次输入的数据集用.

map(c(-10,0,10,100),~rnorm(n=10,mean = .))
map(c(-10,0,10,100),function(x) rnorm(n=10,mean = x))

判断类型 map_lgl

判断每一列是否为因子型变量

map_lgl(iris ,is.factor)
iris%>%map_lgl(is.factor)

《R purrr(二)》 image.png

映射函数可以处理任何向量,而不仅仅是列表。与列表一样,映射函数将对向量的每个元素应用该函数。通常选择输入对象为list
The expression map(1:5, runif) is equivalent to running runif(1), runif(2), …, runif(5), and collecting the results in a list. The result is a length five list with numeric vectors of sizes one through five。

What does map(-2:2, rnorm, n = 5) do? Why?
What does map_dbl(-2:2, rnorm, n = 5) do? Why?

《R purrr(二)》 image.png

这是因为map_dbl希望应用于每个元素的函数返回长度为1的数字向量。而我们这个函数输入为一个元素的时候返回的为5个元素,必须要用list来接受,用其他的必须保证输出的为长度为一的对象。所以,下面的就可以了

《R purrr(二)》 image.png

如果我们想要一个数值向量,可以使用map(),然后使用flatten_dbl()

flatten_dbl(map(-2:2, rnorm, n = 5))

推荐阅读
  • 毕业设计:基于机器学习与深度学习的垃圾邮件(短信)分类算法实现
    本文详细介绍了如何使用机器学习和深度学习技术对垃圾邮件和短信进行分类。内容涵盖从数据集介绍、预处理、特征提取到模型训练与评估的完整流程,并提供了具体的代码示例和实验结果。 ... [详细]
  • 2023年京东Android面试真题解析与经验分享
    本文由一位拥有6年Android开发经验的工程师撰写,详细解析了京东面试中常见的技术问题。涵盖引用传递、Handler机制、ListView优化、多线程控制及ANR处理等核心知识点。 ... [详细]
  • 本文介绍了Java并发库中的阻塞队列(BlockingQueue)及其典型应用场景。通过具体实例,展示了如何利用LinkedBlockingQueue实现线程间高效、安全的数据传递,并结合线程池和原子类优化性能。 ... [详细]
  • 从 .NET 转 Java 的自学之路:IO 流基础篇
    本文详细介绍了 Java 中的 IO 流,包括字节流和字符流的基本概念及其操作方式。探讨了如何处理不同类型的文件数据,并结合编码机制确保字符数据的正确读写。同时,文中还涵盖了装饰设计模式的应用,以及多种常见的 IO 操作实例。 ... [详细]
  • 汇编语言等号伪指令解析:探究其陡峭的学习曲线
    汇编语言以其独特的特性和复杂的语法结构,一直被认为是编程领域中学习难度较高的语言之一。本文将探讨汇编语言中的等号伪指令及其对初学者带来的挑战,并结合社区反馈分析其学习曲线。 ... [详细]
  • 本文详细介绍了中央电视台电影频道的节目预告,并通过专业工具分析了其加载方式,确保用户能够获取最准确的电视节目信息。 ... [详细]
  • HBase运维工具全解析
    本文深入探讨了HBase常用的运维工具,详细介绍了每种工具的功能、使用场景及操作示例。对于HBase的开发人员和运维工程师来说,这些工具是日常管理和故障排查的重要手段。 ... [详细]
  • 本文详细探讨了KMP算法中next数组的构建及其应用,重点分析了未改良和改良后的next数组在字符串匹配中的作用。通过具体实例和代码实现,帮助读者更好地理解KMP算法的核心原理。 ... [详细]
  • 本文介绍了如何使用JQuery实现省市二级联动和表单验证。首先,通过change事件监听用户选择的省份,并动态加载对应的城市列表。其次,详细讲解了使用Validation插件进行表单验证的方法,包括内置规则、自定义规则及实时验证功能。 ... [详细]
  • 本文总结了在使用Ionic 5进行Android平台APK打包时遇到的问题,特别是针对QRScanner插件的改造。通过详细分析和提供具体的解决方法,帮助开发者顺利打包并优化应用性能。 ... [详细]
  • 本文详细介绍了如何构建一个高效的UI管理系统,集中处理UI页面的打开、关闭、层级管理和页面跳转等问题。通过UIManager统一管理外部切换逻辑,实现功能逻辑分散化和代码复用,支持多人协作开发。 ... [详细]
  • 本文详细介绍了Java中org.w3c.dom.Text类的splitText()方法,通过多个代码示例展示了其实际应用。该方法用于将文本节点在指定位置拆分为两个节点,并保持在文档树中。 ... [详细]
  • 本教程涵盖OpenGL基础操作及直线光栅化技术,包括点的绘制、简单图形绘制、直线绘制以及DDA和中点画线算法。通过逐步实践,帮助读者掌握OpenGL的基本使用方法。 ... [详细]
  • 本文详细探讨了JDBC(Java数据库连接)的内部机制,重点分析其作为服务提供者接口(SPI)框架的应用。通过类图和代码示例,展示了JDBC如何注册驱动程序、建立数据库连接以及执行SQL查询的过程。 ... [详细]
  • 深入了解 Windows 窗体中的 SplitContainer 控件
    SplitContainer 控件是 Windows 窗体中的一种复合控件,由两个可调整大小的面板和一个可移动的拆分条组成。本文将详细介绍其功能、属性以及如何通过编程方式创建复杂的用户界面。 ... [详细]
author-avatar
mobiledu2502927267
这个家伙很懒,什么也没留下!
PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | 在线工具
Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved | 京公网安备 11010802041100号 | 京ICP备19059560号-4 | PHP1.CN 第一PHP社区 版权所有