R: Weibull link function with guessing and lapsing rates
weibull_link_private
R Documentation
Weibull link function with guessing and lapsing rates
Description
THIS IS AN INTERNAL FUNCTION: USE WEIBULL_LINK FOR BEST RESULTS. 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
weibull_link_private( K, guessing, lapsing )
Arguments
K
power parameter for reverse Weibull link function
guessing
guessing rate
lapsing
lapsing rate
Value
link
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<-weibull_link_private( 20, 0, 0 )
fit <- glm( glmformula, data = glmdata, weights = m, family = binomial( userlink ) )