r - 使用 Purrr 包生成具有正确 xlab 的绘图

我正在尝试使用 Purrr 包中的 map 函数一次性生成一堆图。我遇到了 xlab 标题的问题。


library(dplyr)
library(purrr)

df <- mtcars

df %>% keep(is.numeric) %>%
       map(~qplot(.), geom = 'density')

每个结果图的 xlab 变为 .。我尝试将 xlab = . 包含到该函数中，但它不起作用。如何将正确的 xlab (例如列名称)添加到每个图中？谢谢!

最佳答案

map 仅迭代列，而不迭代列的名称。您还可以使用 imap 迭代名称。例如

df %>% keep(is.numeric) %>%
  imap(~qplot(.x, xlab=.y, geom = 'density'))

关于r - 使用 Purrr 包生成具有正确 xlab 的绘图，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/55797502/