R计算排列和组合

library(combinat)
permn(3)
length(permn(3))

combn(1000, 2)
dim(combn(1000,2))[2]

组合(Combinations)和排列(Permutation)计算公式为


perm = function(n, x) {
  return(factorial(n) / factorial(n-x))
}

comb = function(n, x) {
  return(factorial(n) / (factorial(x) * factorial(n-x)))
}

组合数：choose(n, k)
注意：从n个中选出k个
阶乘（k！）：factorial(k)
排列数：choose(n, k) * factorial(k)