Nothing
# 制作 lattice 需要的数据框以及修改 lattice 的图形参数
library(lattice)
set.seed(100)
# 首先生成三个向量数据
x = runif (100, 0, 10)
y = rnorm(100)
z = rchisq(100, 2)
comp = make.groups(x, y, z) # 将三个向量合并到同一数据框中
bxp0 = bwplot(which ~ data, data = comp, horizontal = TRUE, xlab = "",
scales = list(y = list(labels = c("$x$", "$y$","$z$"))))
print(bxp0)
trellis.par.set(
plot.symbol = list(pch = 19, col = "black"),
box.rectangle = list(lwd = 4, col = "red"),
box.umbrella = list(lwd = 4, col = "red")
)
print(bxp0) # 这里的 bxp0 对象来自前一幅图,可再次利用
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.