# NOT RUN {
#Default example
library(cpcens)
ans<-AR1.data()
#example (right censoring)
out = AR1.data ( n=500 , N = 100 , K = 5 , eps = 1 , rho=0.2,
mu = 0, siga = 1, rates = c(NA,0.4), Mrate=0 )
#example (left censoring)
out = AR1.data( n=500 , N = 100 , K = 5 , eps = 1 , rho=0.4,
mu = 0, siga = 1, rates = c(0.3,NA), Mrate=0 )
#example (interval censoring)
out = AR1.data ( n=500 , N = 100 , K = 5 , eps = 1 , rho=0.4,
mu = 0, siga = 1, rates = c(0.4,0.5), Mrate=0 )
# }
Run the code above in your browser using DataLab