ggplot2 аннотация текста с символом графика

Question

Я хотел бы легенду на участок ggplot2. Легенда должна идентифицировать символ построения с данными. Например, данные 1 строятся с заполненным квадратом, а data2 - с заполненным кружком.

Есть ли способ сделать это?

Приведенный ниже пример из предыдущего вопроса stackoverflow работал с добавлением символа математики (perp.).

p <- p + annotate("text",2005,5, label="E(y)*symbol('\\136')*b", parse=TRUE) 

Answer 1

Может быть, этот пример помогает:

df <- mtcars[,c(5,6,9)] 
df[,3] <- as.factor(df[,3]) 
p <- ggplot(df, aes(x=drat,y=wt, fill=am, shape=am)) + 
      geom_point(size=4)+scale_shape_manual(values=c(21,22)) 

Вот сюжет:

Значения 21 и 22 относятся к кружком и заполненной площади, соответственно. См. ?points для получения полного списка доступных символов.