KM-weibull分布 生成随机数----R语言 set.seed(1) u <- runif(10000,0,1) beta = 0.5 alpha = 3 x <- 1/beta*(-log(1+log(1-u*(exp(1)-1)/exp(1))))^(1/alpha) hist(x[x<10000],freq = F,main = paste("概率密度函数")) #