Nothing
#####
## Tests for plot interface
require("papeR")
## make sure other plot functions work
example("plot.data.frame", package = "graphics", ask = FALSE)
example("plot.formula", package = "graphics", ask = FALSE)
####
## check plot.ldf
data <- data.frame(a = 1:10, b = 10:1, c = rep(1:2, 5))
data$z <- as.factor(rep(2:3, each = 5))
data <- as.ldf(data)
## plot the data auto"magically"; numerics as boxplot, factors as barplots
par(mfrow = c(2,2))
plot(data)
## a single plot
plot(data, variables = "a")
## grouped plot
plot(data, variables = "a", by = "z")
## make "c" a factor and plot "c" vs. "z"
data$c <- as.factor(data$c)
plot(data, variables = "c", by = "z")
## the same
plot(data, variables = 3, by = 4)
## plot everithing against "b"
## (grouped boxplots, stacked barplots or scatterplots)
plot(data, with = "b")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.