search for: plnormt

...d(y) if(plot.it) { lines(x, dlnormt(x, meanlog=mu,sdlog=sigma,b=b), lty = lty,col="red")} result <- list(mu=mu,sigma=sigma,b=b) class(result) <- "lnormt" result} dlnormt<-function(x,mu,sigma,b) dlnorm(x-b,meanlog=mu,sdlog=sigma) plnormt<-function(x,mu,sigma,b) plnorm(x-b,meanlog=mu,sdlog=sigma) qlnormt<-function(p,mu,sigma,b) qlnorm(p,meanlog=mu,sdlog=sigma)+b rlnormt<-function(n,mu,sigma,b) rlnorm(n,meanlog=mu,sdlog=sigma)+b ############### # [2] COMMANDS ############### # EXP tmp <- exptfit(data,b=30) ks.test(data,...