tests/usl-nlxb.R

# usl-nlxb.R --- Test method nlxb

library(usl)

options(scipen=9)

data(specsdm91)

u <- usl(throughput ~ load, specsdm91, method = "nlxb")

signif(coef(u)[['alpha']], 2)
signif(coef(u)[['beta']], 2)
signif(coef(u)[['gamma']], 2)

Try the usl package in your browser

Any scripts or data that you put into this service are public.

usl documentation built on Aug. 29, 2022, 1:06 a.m.