R establece manualmente la forma por factor

Hice esta pregunta el otro día, pero nadie pudo visualizar mi pregunta, así que he dado un ejemplo.

A <- c('a','b', 'c','d','e')
types <- factor(A)
B <- c(1,2,3,4,5)
C <- c(6,7,8,9,10)
D <- c(1,2,1,2,3)
ABC <- data.frame(B,C,D,types)

library(ggplot2)

ggplot(ABC, aes(x=B ,y=C ,size=D, colour=as.factor(types),label=types, shape=as.factor(types))) +
geom_point()+geom_text(size=2, hjust=0,colour="black", vjust=0) +
scale_size_area(max_size=20, "D", breaks=c(100,500,1000,3000,5000))  +
scale_x_log10(lim=c(0.05,10),breaks=c(0.1,1,10))+ scale_y_continuous(lim=c(0,30000000)) +
scale_shape_manual(values=c(15,18,16,17,19))`

Al trazar esto, habrá factores a-e que tienen colores y formas atribuidos a ellos.

En mi código, uso scale_shape_manual para establecer las formas y se definen por secuencia, es decir, el orden de los factores es a, b, c, d, e y mis valores son 15,18,16,17,19, entonces a = 15 (a cuadrado), b = 18, etc., etc.

Me gustaría establecer estas formas por factor. Mis datos cambiarán cada día y los factores estarán en diferentes órdenes, pero siempre quiero que los mismos factores tengan las mismas formas.

Entonces, obviamente, este código no funciona, pero algo así como:

scale_shape_manual(values=('a'=15, 'b'=18, 'c'=16, 'd'=17, 'e'=19))

Sería útil si pudiera hacer lo mismo para el color también.

Gracias

Respuestas a la pregunta(1)

Su respuesta a la pregunta