Hello, can i implement this as 10% censored data where t gives me failure and x censored. Thank you
p=2;b=120 n=50 set.seed(132); r<-sample(1:50,45) t<-rweibull(r,shape=p,scale=b) t set.seed(123); cens <- sample(1:50, 5) x<-runif(cens,shape=p,scale=b) x Chris Guure Researcher, Institute for Mathematical Research UPM ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
