Description Usage Arguments Value Examples
set_lattice_ggplot: lattice-Theme
set_lattice_bw: schwarz-weis lattice-Theme
set_lattice: set and reset of lattice default options
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | set_lattice_ggplot(
  pch = 15:18,
  lty = 1:3,
  cex = 1,
  col = NULL,
  col.bar = NULL,
  strip.background.col = c("grey80", "grey70", "grey60"),
  ...
)
set_lattice_bw(
  pch = 15:18,
  lty = 1:3,
  cex = 1,
  col = grey.colors(7, start = 0.3, end = 0.9),
  col.bar = "grey50",
  strip.background.col = "white",
  ...
)
set_lattice(theme = NULL)
reset_lattice(...)
 | 
| pch, lty, cex | parameter an plot | 
| col | Farbe rosa-himmelblau brewer.pal(8,"Set3")[c(3,4)] Grau grey.colors(5, start = 0.3, end = 0.9) oder gray(seq(0,.9,len = 25)) | 
| col.bar | Farben | 
| strip.background.col | set_lattice_bw: "white" sonst c("grey80", "grey70", "grey60"), | 
| ... | nicht benutzt | 
| theme | ggplot2like(), custom.theme(), theEconomist.theme | 
im Hintergrund oopt unt opar sowie invisible(lattice::trellis.par.get())
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | #' 
set.seed(2)
n <- 20 * 3 * 2
DF <- data.frame(
  n = runif(n, min = 1, max = 5),
  e = runif(n, min = 1, max = 5),
  o = runif(n, min = 1, max = 5),
  g = runif(n, min = 1, max = 5),
  a = runif(n, min = 1, max = 5),
  treatment = gl(3, n / 3, labels = c("UG1", "UG2", "KG"))[sample.int(n)],
  sex = gl(2, n / 2, labels = c("male", "female"))
)
set_lattice_ggplot()
bwplot2(e ~ treatment,
        DF,
        groups = sex,
        auto.key = list(columns = 2))
set_lattice_bw()
bwplot2(e ~ treatment,
        DF,
        groups = sex,
        auto.key = list(columns = 2))
 
 | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.