par(mfrow = c(2, 3))
image(volcano, col = funPals[["spBoys"]], main = "South Park Boys")
image(volcano, col = funPals[["spKenny"]], main = "Kenny")
image(volcano, col = funPals[["spStan"]], main = "Stan")
image(volcano, col = funPals[["spKyle"]], main = "Kyle")
image(volcano, col = funPals[["spCartman"]], main = "Cartman")
image(volcano, col = funPals[["spcredits"]], main = "Credits")
par(mfrow = c(2, 2))
image(volcano, col = funPals[["boem"]], main = "Brotherhood of Mutants")
image(volcano, col = funPals[["xmen1"]], main = "X-Men 1")
image(volcano, col = funPals[["xmen2"]], main = "X-Men 2")
image(volcano, col = funPals[["marvel"]], main = "Marvel Group")
par(mfrow = c(1, 3))
image(volcano, col = funPals[["turboKid1"]], main = "Turbo Kid 1")
image(volcano, col = funPals[["turboKid2"]], main = "Turbo Kid 2")
image(volcano, col = funPals[["turboKid3"]], main = "Turbo Kid 3")
image(volcano, col = funPals[["beavisButthead"]], main = "Beavis and Butthead")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.