Provides print methods for objects.

## Usage

``````# S4 method for EL
print(x, digits = max(3L, getOption("digits") - 3L), ...)

# S4 method for ELMT
print(x, digits = max(3L, getOption("digits") - 3L), ...)

# S4 method for ELT
print(x, digits = max(3L, getOption("digits") - 3L), ...)

# S4 method for LM
print(x, digits = max(3L, getOption("digits") - 3L), ...)

# S4 method for SummaryEL
print(x, digits = max(3L, getOption("digits") - 3L), ...)

# S4 method for SummaryELMT
print(
x,
digits = max(3L, getOption("digits") - 3L),
signif.stars = getOption("show.signif.stars"),
...
)

# S4 method for SummaryELT
print(x, digits = max(3L, getOption("digits") - 3L), ...)

# S4 method for SummaryGLM
print(
x,
digits = max(3L, getOption("digits") - 3L),
signif.stars = getOption("show.signif.stars"),
...
)

# S4 method for SummaryLM
print(
x,
digits = max(3L, getOption("digits") - 3L),
signif.stars = getOption("show.signif.stars"),
...
)``````

## Arguments

x

An object to be printed.

...

Further arguments passed to methods.

digits

A single integer for the number of significant digits to be passed to `format()`.

signif.stars

A single logical. If `TRUE`, ‘significance stars’ are printed for each parameter.

## Value

The argument `x` (invisibly).

## Examples

``````data("precip")
fit <- el_mean(precip, par = 40)
print(fit)
#>
#> 	Empirical Likelihood
#>
#> Model: mean
#>
#> Maximum EL estimates:
#> [1] 34.89
#>
#> Chisq: 9.957, df: 1, Pr(>Chisq): 0.001602
#> EL evaluation: converged
#>
``````