tests/sme.R

library(sme)
data(MTB)
fits <- sme(MTB)
sapply(fits,logLik)

fits <- sme(MTB,numerOfThreads=10)
sapply(fits,logLik)

fit <- sme(MTB[MTB$variable==6031,c("y","tme","ind")])
logLik(fit)

data(inflammatory)
fit <- sme(inflammatory,deltaNM=0.1,deltaEM=0.1)
logLik(fit)

fit <- sme(inflammatory,knots=c(29.5,57,84.5),deltaEM=0.1,deltaNM=0.1)
AIC(fit)
AICc(fit)
BIC(fit)
BICn(fit)

Try the sme package in your browser

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

sme documentation built on May 2, 2019, 4:03 a.m.