RosettaCodeData/Task/Fibonacci-sequence/SuperCollider/fibonacci-sequence-3.supercollider

10 lines
158 B
Text
Raw Permalink Normal View History

2016-12-05 22:15:40 +01:00
(
f = { |n|
var sqrt5 = sqrt(5);
var p = (1 + sqrt5) / 2;
var q = reciprocal(p);
((p ** n) + (q ** n) / sqrt5 + 0.5).trunc
};
(0..20).collect(f)
)