Tengo un conjunto de datos con cuatro niveles para mi variable x: x1, x1, x3, x4.
He realizado un gráfico utilizando el siguiente código:
means <- tapply(y,x1,mean)
plot(means, col="red",pch=18,type = 'l')
Después he añadido para x2, x3 y x4, el resto de medias.
lines(means, col="blue",pch=18)
Me gustaría añadir una pequeña leyenda en el lateral derecho que representara el color de cada valor de x.