L********d
发帖数: 3820 | 1 给定一个set{1,2,3,...,n}
列出所有它的子集
谢谢！ | s*****n
发帖数: 2174 | 2 好像没有直接的函数, 不过有变通的办法, 比如:
library(e1071)
n <- 4
tt <- bincombinations(n) == 1
apply(tt, 1, function(vec) union((1:n)[vec],NULL))
【在 L********d 的大作中提到】
: 给定一个set{1,2,3,...,n}
: 列出所有它的子集
: 谢谢！
| q**j
发帖数: 10612 | 3 combn(n,i) and
iterate on i
【在 s*****n 的大作中提到】
: 好像没有直接的函数, 不过有变通的办法, 比如:
: library(e1071)
: n <- 4
: tt <- bincombinations(n) == 1
: apply(tt, 1, function(vec) union((1:n)[vec],NULL))
|
|
