R: Reverse Weibull link function with guessing and lapsing rates
revweibull_link_private
R Documentation
Reverse Weibull link function with guessing and lapsing rates
Description
THIS IS AN INTERNAL FUNCTION: USE REVWEIBULL_LINK FOR BEST RESULTS. Reverse Weibull link for use with GLM functions. The guessing rate and lapsing rate are fixed, and power parameter is set to be equal K, hence link is a function of only one variable
Usage
revweibull_link_private( K, guessing, lapsing )
Arguments
K
power parameter for reverse Weibull link function
guessing
guessing rate
lapsing
lapsing rate
Value
link
Reverse Weibull link for use in all GLM functions
Examples
data( "01_Miranda" )
x <- example01$x
r <- example01$r
m <- example01$m
glmdata <- data.frame( cbind( r/m ,m , x ) )
names( glmdata ) <- c( "resp", "m", "x" )
glmformula <- c( "resp ~ x" )
userlink<-revweibull_link_private( 20, 0, 0 )
fit <- glm( glmformula, data = glmdata, weights = m, family = binomial( userlink ) )