revweibull_link_private: Reverse Weibull link function with guessing and lapsing rates

In modelfree: Model-free estimation of a psychometric function

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 ) )

modelfree documentation built on May 2, 2019, 6:07 p.m.