Создать график рассеяния между несколькими переменными

Question

Создание точечной диаграммы между flavanoids и phenols. Имейте точечный цвет и форму, отражающую происхождение вина.

дано:

wineurl <- paste("https://archive.ics.uci.edu/ml/",
             "machine-learning-databases/wine/wine.data", sep = "")
wine <- as_tibble(read.csv(file = wineurl, header = FALSE))
colnames(wine) <- c("origin", "alcohol", "acid", 
                       "ash", "alcalinity", "magnesium", 
                       "phenols", "flavanoids", "nonflavanoid",
                       "proanthocyanins","color.int", "hue",
                       "od", "proline")

wine <- wine %>% 
  mutate(origin = factor(origin))

Answer 1

try ggplot(wine, aes(x = flavanoids, y = phenols, col=origin)) + geom_point().

ggplot() говорит R сделать график фенолов против флаваноидов и использовать разные цвета для различного происхождения. и geom_point() говорит R сделать точечный график.