Perhaps: plot(1:10,1:10,type="n") points(1:5,1:5,pch="+") points(6:10,6:10,pch=20) legend(5,5, c("A","B"), pch=c("+", NA)) legend(5,5, c("A","B"), pch=c(NA, 20)) -Lauri