如何运用stata编程实现 a b c d 四个值之间的组合？谢谢！

*精简了一下（各符号由空格相隔，以下以7个不同符号为例）：
clear
loc w="a b c d e f g"
loc n=wordcount("`w'")
loc m=2^`n'
set ob `m'
g y=""
foreach i of loc w{
loc n=`n'-1
replace y=y+cond(mod(int((_n-1)/2^`n'),2),word("`w'",`n'+1),"")
}
l

谢谢！很是佩服！高人也！

sungmoo 发表于 2012-2-29 22:18
本题实际上是在找一个集合的所有子集（空集亦是子集）。元素为n的集合共有2^n个子集。

请问求这个子集大概应该用什么方法。。。或者指令。
会用其他编程语言写，但用stata就比较费力。。。

*利用二进制数的特点
clear
loc w="a b c d e f g"
loc n=wordcount("`w'")
set ob `=2^`n''
g y=""
forv i=1/`n'{
replace y=y+cond(mod(int((_n-1)/2^(`i'-1)), 2),word("`w'",`i'),"")
}
n l

sungmoo 发表于 2015-2-6 12:16
*利用二进制数的特点
clear
loc w="a b c d e f g"

求教，如果是想实现一组数的全排列呢，比如{1，1,1,0,0,0}