Вот пример одного из способов сделать это, используя tidyr
и ggplot
. tidyr::gather
может вытянуть столбцы без mpg в длинный формат, каждый из которых соответствует соответствующему mpg. Затем данные отображаются в ggplot
, так что x - это mpg, а y - другое значение, а имя столбца, из которого он получен, сопоставляется с фасетами.
library(tidyverse)
mtcars %>%
select(rowname, mpg, cyl, disp, hp) %>%
gather(stat, value, cyl:hp) %>%
ggplot(aes(mpg, value)) +
geom_point() +
facet_grid(stat~., scales = "free")