... points(u,y[,1],pch=c("+","o")[y[,2]+1]) gg <— gamma(1+1/fit1.loglogis$nu)* gamma(1—1/fit1.loglogis$nu) lines(u,gg*exp(est1$fit)) lines(u ...
確定! 回上一頁