# NOT RUN {
loglink(seq(-0.2, 0.5, by = 0.1))
loglink(seq(-0.2, 0.5, by = 0.1), bvalue = .Machine$double.xmin)
negloglink(seq(-0.2, 0.5, by = 0.1))
negloglink(seq(-0.2, 0.5, by = 0.1), bvalue = .Machine$double.xmin)
# }
# NOT RUN {
logneglink(seq(-0.5, -0.2, by = 0.1))
# }
Run the code above in your browser using DataLab