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)
smoeding/usl documentation built on Oct. 1, 2022, 3:14 a.m.