R Under development (unstable) (2023-10-23 r85389 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2023 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> 
> library(lattice)
> 
> ## Output of summary() methods
> 
> d <- list(x = 1:10, y = 1:10, g = gl(2, 5))
> 
> summary(barchart(factor(y) ~ x, d))     # S3method(barchart, formula)

Call:
barchart(factor(y) ~ x, d)

Number of observations:
[1] 10
> summary(barchart(unclass(Titanic)))     # S3method(barchart, array)

Call:
barchart(unclass(Titanic))

Number of observations:
        Age
Sex      Child Adult
  Male       8     8
  Female     8     8
>                                         # S3method(barchart, default)
> summary(barchart(VADeaths))             # S3method(barchart, matrix)

Call:
barchart(VADeaths)

Number of observations:
[1] 20
> summary(barchart(precip))               # S3method(barchart, numeric) 

Call:
barchart(precip)

Number of observations:
[1] 70
> summary(barchart(Titanic))              # S3method(barchart, table)

Call:
barchart(Titanic)

Number of observations:
        Age
Sex      Child Adult
  Male       8     8
  Female     8     8
> 
> summary(bwplot(g ~ x, d))               # S3method(bwplot, formula)

Call:
bwplot(g ~ x, d)

Number of observations:
[1] 10
> summary(bwplot(precip))                 # S3method(bwplot, numeric)

Call:
bwplot(precip)

Number of observations:
[1] 70
> 
> summary(densityplot( ~ x | g, d))       # S3method(densityplot, formula)

Call:
densityplot(~x | g, d)

Number of observations:
g
1 2 
5 5 
> summary(densityplot(precip))            # S3method(densityplot, numeric)

Call:
densityplot(precip)

Number of observations:
[1] 70
> 
> summary(dotplot(factor(y) ~ x, d))      # S3method(dotplot, formula)

Call:
dotplot(factor(y) ~ x, d)

Number of observations:
[1] 10
> summary(dotplot(unclass(Titanic)))      # S3method(dotplot, array)

Call:
dotplot(unclass(Titanic))

Number of observations:
        Age
Sex      Child Adult
  Male       8     8
  Female     8     8
>                                         # S3method(dotplot, default)
> summary(dotplot(VADeaths))              # S3method(dotplot, matrix)

Call:
dotplot(VADeaths)

Number of observations:
[1] 20
> summary(dotplot(precip))                # S3method(dotplot, numeric) 

Call:
dotplot(precip)

Number of observations:
[1] 70
> summary(dotplot(Titanic))               # S3method(dotplot, table)

Call:
dotplot(Titanic)

Number of observations:
        Age
Sex      Child Adult
  Male       8     8
  Female     8     8
> 
> 
> ## S3method(histogram,     formula)
> ## S3method(histogram,     factor)
> ## S3method(histogram,     numeric)
> ## S3method(qqmath,        formula)
> ## S3method(qqmath,        numeric)
> ## S3method(stripplot,     formula)
> ## S3method(stripplot,     numeric)
> ## S3method(qq,            formula)
> 
> summary(xyplot(y ~ x | g, data = d))    # S3method(xyplot, formula)

Call:
xyplot(y ~ x | g, data = d)

Number of observations:
g
1 2 
5 5 
> summary(with(d, xyplot(y ~ x | g)))     # S3method(xyplot, formula)

Call:
xyplot(y ~ x | g)

Number of observations:
g
1 2 
5 5 
> summary(xyplot(sunspot.year))           # S3method(xyplot, ts)

Call:
xyplot(sunspot.year)

Number of observations:
[1] 289
> 
> ## S3method(levelplot,     formula)
> ## S3method(levelplot,     table)
> ## S3method(levelplot,     array)
> ## S3method(levelplot,     matrix)
> ## S3method(contourplot,   formula)
> ## S3method(contourplot,   table)
> ## S3method(contourplot,   array)
> ## S3method(contourplot,   matrix)
> ## S3method(cloud,         formula)
> ## S3method(cloud,         matrix)
> ## S3method(cloud,         table)
> ## S3method(wireframe,     formula)
> ## S3method(wireframe,     matrix)
> ## S3method(splom,         formula)
> ## S3method(splom,         matrix)
> ## S3method(splom,         data.frame)
> 
> ## S3method(parallelplot,  formula)
> ## S3method(parallelplot,  matrix)
> ## S3method(parallelplot,  data.frame)
> 
> 
> 
>         
> 
> proc.time()
   user  system elapsed 
   0.23    0.04    0.26