powered by
plotSymbols(interactive=FALSE) availColors(indx = 0:6) plotSymbolsFonts(fn=1)
# A first impression: opar <- par(mfrow=c(1,2)) n<-1:34; plot(n,pch=n) # There is a gap between 25 and 34 plotSymbols(TRUE) par(opar)
Run the code above in your browser using DataLab