Displaying 1 result from an estimated 1 matches for "lowertest".
Did you mean:
powertest
2010 Aug 27
0
How to maintain class signature in splom
...that I'll use
setClass("censored",
representation(event = "numeric"),
contains = "numeric")
# This is a simplification of what I'm doing to show that I'm not retaining
# the 'censored' class into the lower.panel function
panel.lowerTest <- function(x, y, ...) {
print(class(x))
print(x)
print(class(y))
print(y)
cat("\n\n ---------\n\n")
panel.xyplot(x,y,...)
}
# Here is a simple data example
library(survival)
library(lattice)
data(lung)
lung = lung[1:50,c("inst", "time", "status&q...