On 11-Apr-2012 16:28:31 Christopher Kelvin wrote:
> 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,
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
2 matches
Mail list logo
