Создание множества точечных графиков, когда данные представлены в формате tidy (long) с помощью ggplot

Question

Я не смог найти ответов на этот вопрос.

У меня есть набор данных, который имеет этот формат:

mtcars %>% 
  mutate(row_number=row_number()) %>% 
  select(row_number, mpg, disp, hp, wt) %>% 
  gather(mpg, disp, hp, wt, key="key", value= "value")

Я хотел бы сделать 6 точечных диаграмм, т.е. со всеми комбинациями, например, mpg vs disp;MPG против HP и т. д.