RosettaCodeData/Task/Fibonacci-sequence/Stata/fibonacci-sequence-2.stata

13 lines
119 B
Plaintext

program fib
args n
clear
qui set obs `n'
qui gen a=.
dyngen {
update a=a[_n-1]+a[_n-2], missval(1)
}
end
fib 10
list