nagelkerkeR2 {sizeMat}

Nagelkerme method R-square

Description

Estimate Nagelkerke's R squared from the result of glm(). Evaluate the goodness of fit for logistic regression.

Usage

nagelkerkeR2(x)

Arguments

x

An object of class 'glm'.

Value

Rsquare Nagelkerke's R squared.

Examples

set.seed(7388)
n <- 300
x <- rnorm(n)
a <- 1
b <- -2
p <- 1/(1+exp(a+b*x))
y <- factor(ifelse(runif(n) < p, 1, 0), levels = 0:1)
mod1 <- glm(y ~ x, family=binomial)
nagelkerkeR2(mod1)