我有一个包含12个学生及其分数的数据框，并且没有可与这么多小组一起使用的密谋色板。我正在尝试使图例的颜色和形状无效，有没有办法做到这一点？
data <- data.frame(name = c("Sara", "Matt", "Mike", "Alyssa", "Ryan", "Parker", "Sam", "Bo", "Tyler", "Jess", "Maya", "Sara", "Matt", "Mike", "Alyssa", "Ryan", "Parker", "Sam", "Bo", "Tyler", "Jess", "Maya"),
grade = runif(24, 50, 100),
age = runif(24, 15,20))