Residual sum of square of a fitted model — VI

This function returns the residual sum of square of a fitted model.

Value

Numeric value.

Examples


# Instantiate
x <- rand_uniform()
e <- rand_normal()
test <- vi_model(prm = list(x = x, e = e),
                 prm_type = list(x = "r", e = "r"),
                 formula = y ~ 1 + x + x^2 + e,
                 null_formula = y ~ x,
                 alt_formula = y ~ x + I(x^2))

test$rss(test$fit(test$gen(100)))
#> [1] 95.28764