Generate an unevaluated call corresponding to the predict step of the passed model. The call represents the response function of the linear predictor in terms of elementary functions on the underlying column names, and is suitable for direct translation into SQL.
A supported model object.
The name of a custom response function to apply to the linear predictor.
An unevaluated R call object representing the response function of the linear predictor.
The Binomial models in glmboost return coefficients which are 1/2 the coefficients fit by a call to glm(..., family=binomial(...)), because the response variable is internally recoded to -1 and +1. sqlscore multiplies the returned coefficients by 2 to put them back on the same scale as glm, and adds the glmboost offset to the intercept before multiplying.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
# A Gaussian GLM including factors mod <- glm(Sepal.Length ~ Sepal.Width + Petal.Length + Petal.Width + Species, data=datasets::iris) score_expression(mod) # A binomial GLM - linear predictor is unaffected mod <- glm(Sepal.Length > 5.0 ~ Sepal.Width + Petal.Length + Petal.Width + Species, data=datasets::iris, family=binomial("logit")) score_expression(mod) #With a hand-specified response function score_expression(mod, response="probit") #With formula operators x <- matrix(rnorm(100*20),100,20) colnames(x) <- sapply(1:20, function(x) paste0("X", as.character(x))) x <- as.data.frame(x) mod <- glm(X2 ~ X3 + X5 + X15*X8, data=x) score_expression(mod)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.