logit("a")
logit("a", short=FALSE)
logit("a", short=FALSE, tag=TRUE)
logoff(2:5, earg=list(offset=1)) # Same as log(2:5 + 1)
powl(2:5, earg=list(power=2)) # Same as (2:5)^2
data(hunua)
fit1 = vgam(agaaus ~ altitude, binomialff(link=cloglog), hunua) # ok
fit2 = vgam(agaaus ~ altitude, binomialff(link="cloglog"), hunua) # ok
# This no longer works since "clog" is not a valid VGAM link function:
fit3 = vgam(agaaus ~ altitude, binomialff(link="clog"), hunua) # not ok
par(mfrow=c(2,2))
p = seq(0.01, 0.99, len=200)
x = seq(-4, 4, len=200)
plot(p, logit(p), type="l", col="blue")
plot(x, logit(x, inverse=TRUE), type="l", col="blue")
plot(p, logit(p, deriv=1), type="l", col="blue") # reciprocal!
plot(p, logit(p, deriv=2), type="l", col="blue") # reciprocal!
Run the code above in your browser using DataLab