Удаление результатов из ggplot (scatterplot) при использовании Geom_Point (цвет)

Question

Я пытаюсь удалить серые точки на моей диаграмме рассеяния и не могу это сделать. Я приложил строки кода, которые я использую ниже. Я считаю, что использование подмножества помогло бы, но подумал, что «цвет» в geom_point будет применять только точки из выбранных переменных в «цвет»

ggplot(MLS_Draft_File, aes(x = MLS_Draft_File$`Overall Pick Number`, 
                           y = MLS_Draft_File$`Percentage of Minutes Played`)) +
geom_point(aes(color = MLS_Draft_File$`Drafting Club`)) + 
lims(color = c("New York City FC", "Orlando City SC", "Atlanta United FC", "Minnesota United FC", "Los Angeles FC", "FC Cincinnati"))

Answer 1

Серые точки - это все клубы в вашем наборе данных, которые не имеют цвета, определенного элементами, которые вы передали в своей функции lims. Таким образом, чтобы удалить серые точки, вы можете задать подкадр данных, чтобы оставить только интересующие вас клубы:

library(ggplot2)
club <- c("New York City FC", "Orlando City SC", "Atlanta United FC", "Minnesota United FC", "Los Angeles FC", "FC Cincinnati")
ggplot(subset(MLS_Draft_File, `Drafting Club` %in% club), aes(x = `Overall Pick Number`, 
                           y = `Percentage of Minutes Played`)) +
  geom_point(aes(color =`Drafting Club`)) + 
  lims(color = club)

Если это не работает, рассмотрите возможность воспроизведения воспроизводимого примера набора данных, см. Эту ссылку, чтобы узнать, как чтобы сделать это: Как сделать великолепный воспроизводимый пример R