auto_plot: Lattice-Matrix-Plot

In stp4/stp25plot: meine plots

Lattice-Matrix-Plot

Description

marginal_plot: lattice marginal plot

Usage

auto_plot(...)

## S3 method for class 'lm'
auto_plot(x, ...)

## Default S3 method:
auto_plot(
  ...,
  origin = 0,
  xlab = NULL,
  ylab = NULL,
  type = c("p", "r"),
  cex.main = 1,
  cex.scales = 0.75,
  ncol = NULL,
  default.scales = list(abbreviate = TRUE, minlength = 5, cex = cex.scales),
  layout = NULL,
  lattice.options = list(layout.heights = list(axis.xlab.padding = list(x = 0),
    xlab.key.padding = list(x = 0))),
  col = farbe(),
  col.bar = "gray50",
  par.settings = bw_theme(col = col, col.bar = col.bar),
  include.n = TRUE,
  par.strip.text = NULL,
  wrap.main = NULL,
  grid.arrange = TRUE,
  levels.logical = c(TRUE, FALSE),
  labels.logical = levels.logical,
  include.percent = FALSE,
  include.reorder = FALSE,
  include.reorder.last = NULL,
  main = ""
)

marginal_plot(
  ...,
  par.settings = bw_theme(farbe()),
  auto.key = list(lines = TRUE),
  plot.points = FALSE,
  ref = TRUE,
  cut = 0,
  cut.groups = 3,
  labels.groups = NULL,
  origin = 0,
  xlab = NULL,
  ylab = NULL,
  type = NULL,
  main = "marginal distributions",
  subset = TRUE,
  as.table = TRUE,
  subscripts = TRUE,
  default.scales = list(relation = "free", abbreviate = TRUE, minlength = 5, rot = 0, cex
    = 0.75, tick.number = 3),
  layout = NULL,
  lattice.options = list(layout.heights = list(axis.xlab.padding = list(x = 0),
    xlab.key.padding = list(x = 0)))
)

Arguments

...	an prepare_data2
ylab, xlab	default ist ""
type	c("histogram", "boxplot")
cex.main, cex.scales	Ueberschrift und Scales
ncol	an grid.arrange
par.settings	sefault ist par.settings = bw_theme((farbe()))
include.n	noch nicht implemeniert
grid.arrange	logical Arrange multiple grobs on a page
par.settings, auto.key	an lattice sefault ist par.settings = stp25output::set_lattice()

Value

lattice Plot

lattice Plot

Examples

enviro <- lattice::environmental

enviro <- transform(
  enviro,
  smell = cut(
    enviro$ozone,
    breaks = c(0, 30, 50, Inf),
    labels = c("ok", "hmmm", "yuck"),
    ordered = TRUE
  ),
  is.windy = factor(
    enviro$wind > 10,
    levels = c(TRUE, FALSE),
    labels = c("windy", "calm")
  )
)
#head(enviro)
# marginal.plot(enviro[,1:5], data = enviro, groups = is.windy,
#               auto.key = list(lines = TRUE))

marginal_plot(enviro, ozone, radiation, is.windy, wind, smell, by =  ~ temperature)

auto_plot(enviro, ozone, radiation, is.windy, wind, smell, by =  ~ temperature)

auto_plot(ozone ~ radiation + is.windy + wind + smell, enviro)

auto_plot(enviro, ozone[box], radiation[hist], is.windy[pie], wind, smell, temperature)

auto_plot(enviro, ozone, radiation, is.windy, wind, by =  ~ smell)

# das ist eine Liste mit plots
p1 <-
  auto_plot(enviro,
            ozone,
            radiation,
            is.windy,
            wind,
            smell,
            temperature,
            grid.arrange = FALSE)


for (i in seq_along(p1)) {
  cat("\n", names(p1[i]))
  print(p1[[i]])
  #  SavePlot(  names(p1[i]) , w=3.6, h=2.9)
}

stp4/stp25plot documentation built on March 29, 2025, 4:26 p.m.