View source: R/summary.varComprob.R
summary.varComprob | R Documentation |
Summary method for R object of class "varComprob"
.
## S3 method for class 'varComprob' summary(object, print.outliers = FALSE, ...)
object |
an R object of class |
print.outliers |
logical. If |
... |
potentially more arguments passed to methods. |
summary(object)
returns an object of S3 class
"summary.varComprob"
, basically a list
.
Claudio Agostinelli and Victor J. Yohai
if (!require(nlme)) stop() data(Orthodont) z1 <- rep(1, 4) z2 <- c(8,10,12,14) K <- list() K[[1]] <- tcrossprod(z1,z1) ## Int K[[2]] <- tcrossprod(z1,z2) + tcrossprod(z2,z1) ## Int:age K[[3]] <- tcrossprod(z2,z2) ## age names(K) <- c("Int", "Int:age", "age") p <- 4 n <- 27 groups <- cbind(rep(1:p, each=n), rep((1:n), p)) ## Composite Tau OrthodontCompositeTau <- varComprob(distance ~ age*Sex, groups = groups, data = Orthodont, varcov = K, control=varComprob.control(lower=c(0,-Inf,0))) summary(OrthodontCompositeTau, print.outliers=TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.