R/diagnostics.R
link_test.Rd
Pregibon link test
link_test(y, X, model_type = "linear")
Response.
Design matrix.
"linear" or "logistic".
"linear"
"logistic"
A morie_specification_test.
morie_specification_test
set.seed(1) n <- 100 X <- cbind(intercept = 1, x1 = rnorm(n), x2 = rnorm(n)) y <- drop(X %*% c(0.5, 1.0, -0.5) + rnorm(n, sd = 0.5)) r <- link_test(y, X) r$name #> [1] "link_test"