clinDR (version 2.4.1)

print.emaxsimobj: Print a data set generated by emaxsim

Description

Print a data set that has been extracted from emaxsim output

Usage

# S3 method for emaxsimobj
print(x, nprint = min(length(x$y), 20), ...)

Value

Printed output returned as invisible matrix.

Arguments

x

Extracted simulation object

nprint

Number of observations to print. If a vector of length 2, nprint is the range of data to print.

...

No other parameters currently implemented

Author

Neal Thomas

See Also

emaxsim, plot.emaxsimobj, summary.emaxsimobj

Examples

if (FALSE) {

save.seed<-.Random.seed
set.seed(12357)

nsim<-50
idmax<-5
doselev<-c(0,5,25,50,100)
n<-c(78,81,81,81,77)

### population parameters for simulation
e0<-2.465375 
ed50<-67.481113 

dtarget<-100
diftarget<-9.032497
emax<-solveEmax(diftarget,dtarget,log(ed50),1,e0)

sdy<-7.967897
pop<-c(log(ed50),emax,e0)    
meanlev<-emaxfun(doselev,pop)  

###FixedMean is specialized constructor function for emaxsim
gen.parm<-FixedMean(n,doselev,meanlev,sdy)  
D1 <- emaxsim(nsim,gen.parm)
e49<-D1[49]

e49

print(e49,c(101,200))  

.Random.seed<-save.seed
}