data(cells)
plot(cells)
# multitype
data(lansing)
plot(lansing)
# marked by a real number
data(longleaf)
plot(longleaf)
# just plot the points
plot(longleaf, use.marks=FALSE)
plot(unmark(longleaf)) # equivalent
# controlling COLOURS
plot(cells, col="blue")
plot(lansing, cols=c("black", "yellow", "green", "pink",
"blue","red","white")
plot(longleaf, fg="blue")
# use selected plot characters
lma <- sort(unique(longleaf$marks))
adult <- ifelse(lma >= 30, "o", "+")
plot(longleaf, chars = adult)
# make the plotting symbols larger (for publication at reduced scale)
plot(cells, cex=2)
Run the code above in your browser using DataLab