Theme List

Demonstrated using:

pairs(iris[,1:4], col=lab2col(iris$Species))
legend("bottom", legend=unique(iris$Species), col=lab2col(unique(iris$Species)),
       pch=par("pch"), cex=0.8, horiz=TRUE, bty="n", inset=c(0,1), xpd=TRUE
       )

basetheme("clean")

basetheme("brutal")

basetheme("ink")

basetheme("dark")

basetheme("deepblue")

basetheme("royal")

basetheme("minimal")

basetheme("void")