具体程序如下：
captu prog drop bino
prog bino
args N p B
local i=0
local k=0
while `k'<`N'{
local i=`i'+(Binomial(`N',`k',`p')-Binomial(`N',`k'+1,`p'))*abs(`k'/`N'-`p')
local k=`k'+1
}
gen i=`i'
end
上述程序的用意：从数据文件中读取三个变量，然后针对每一组变量进行循环计算，得到i的值，gen命令希望得到所有i的值形成的新变量，但用上述程序只能得到都是同一个数据的变量，不知如何操作，请高手指教！
另外，Stata能否自定义函数，还有自己编写的ado程序能否在其他ado程序中引用，非常感谢！