一般化線形モデルの仕上げ
後輩向けの最後のlectureをファシリテートした。 linear predictor, link function, probability density functionの話の後半二つの内容だった。 x <- c(1:100) par(mfrow=c(1,3)) plot(x,type='l',xlab = "x",ylab = "sum of linear predictor") plot(1/1/(1+exp(-(x-50)/5)),type='l',xlab = "x",ylab = "logit") plot(x…
