tikzscat(rbind(c(1.5, 2), c(0.5, 1)), factor(c(1,2)),
c("mark=square*,mark options={color=red},mark size=0.8pt",
"mark=diamond*,mark options={color=black},mark size=1pt"),
6)
Run the code above in your browser using DataLab