Final prediction error

ols_jp(model)

Arguments

model
an object of class lm

Value

JP

Examples

model <- lm(mpg ~ disp + hp + wt + qsec, data = mtcars) ols_jp(model)
#> [1] 7.94966