data(example)
res<-alpha(example, varphi=.01)
## diagnostic plot
plot(res, type='d')
## alpha with varphi=.01 & standard error
res<-alpha(example, varphi=.01, se=TRUE)
## confidence interval
summary(res)
## weight plot
plot(res)
# or
plot(res, type='w')
## profile plot
plot(res, type='p')
Run the code above in your browser using DataLab