# Rpad Example

Here is a basic R input section followed by the output:

    data(iris)
    dataset = iris
    options(width=50)
    summary(dataset)

Now lets do some fancy HTML output:

HTMLon() Html(head(dataset))

Here is a simple distribution plotting example with a lognormal distribution with meanlog=10 and variable logsd:

Standard deviation

    plot(function(x) dlnorm(x, meanlog = 5, sdlog = sdlog),
         0, 100, main = "lognormal density", ylab="",
         xlab="", col="red")
    HTMLon()
    showgraph()

Here is another graphic:

    data(volcano)
    z <- 2 * volcano; x <- 10 * (1:nrow(z)); y <- 10 * (1:ncol(z))
    persp(x, y, z, theta = 135, phi = 30, col = "green3",
          scale = FALSE, ltheta = -120, shade = 0.75,
          border = NA, box = FALSE)
    HTMLon()
    showgraph()

by Tom Short, tshort@epri.com, Copyright 2005 EPRI, license: GNU GPL v2 or greater