启禀版主大人,小的有奏折要上:
不注意格式的代码会咬人的。
如果你像我一样懒,请用自动格式化包 https://github.com/yihui/formatR/wiki
Ac <- AbscontDistribution(d = function(n, N, a, k,<br />
log = FALSE) {<br />
d <- ncol(combn(n + k - 1, n)) * ncol(combn(N - n + k/a -<br />
k - 1, N - n))/ncol(combn(N + k/a - 1, N))<br />
if (log)<br />
d <- log(d)<br />
return(d)<br />
}, param = c(N, a, k), withStand = TRUE)
</p>
那么什么叫“参数还没设置”呢?
另外,我被ncol(combn())的用法萌到了一点点,英文里组合数怎么读?choose m from n,那么参见?choose