Summary method for objects of class factorplot

Summarizes the number of significant positive and negative differences for objects of class factorplot

# S3 method for factorplot
summary(object, ...)

Arguments

object	An object of class factorplot
...	Other arguments passed to summary, currently not implemented

See also

factorplot

Examples

x <- as.factor(round(runif(1000, .5,5.5)))
levels(x) <- paste("lab", 1:20, sep="")
X <- model.matrix(~x)
b <- rnorm(ncol(X),0,4)
Y.hat <- X %*% b
Y <- Y.hat  + rnorm(1000)
mod <- lm(Y ~ x)
fp <- factorplot(mod, factor.variable="x", pval=0.05, order="alph")
summary(fp)
#>      sig+ sig- insig
#> lab1    2    2     0
#> lab2    0    4     0
#> lab3    1    3     0
#> lab4    4    0     0
#> lab5    3    1     0