Question

我正在尝试使用ggplot和facet_wrap一次性绘制所有变量。但是，我无法使代码正常工作。

我的数据集包含各种类别和数字变量，我希望所有的x变量都相同。

我做了什么：

  data %>%
    keep(is.numeric) %>%
    gather() %>%
    ggplot(aes(value))+
    geom_point(~ key)
      facet_wrap(~ key)

我也尝试过

问题是什么都没有出现，或者缺少y变量...

我希望有人可以帮助我摆脱这一挑战。

Answer 1

这个？根据OP的要求，以下是使用gapminder的代表。可以根据需要进行调整。

gapminder::gapminder %>%
  gather("id","value",4:ncol(.)) %>%  
  ggplot(aes(continent,value,col=id))+geom_col()+facet_wrap(.~id)+
  theme_minimal()+
  theme(axis.text.x = element_text(angle=90))

原始答案：

library(tidyverse)
    iris %>% 
    keep(is.numeric) %>% 
      gather() %>% 
      ggplot(aes(value,key))+geom_point()+facet_wrap(key~.)

示例2：

iris %>% 
keep(is.numeric) %>% 
  gather() %>% 
  ggplot(aes(key,value))+geom_col()+facet_wrap(.~key)

如何使用ggplot和facetwrap绘制数据集中的所有变量

1 个答案: