|
%I #9 Sep 25 2016 02:15:59
%S 0,4,9,13,18,23,27,32,36,41,46,50,55,60,64,69,73,78,83,87,92,96,101,
%T 106,110,115,120,124,129,133,138,143,147,152,157,161,166,170,175,180,
%U 184,189,193,198,203,207,212,217,221,226,230,235,240,244,249,253,258
%N Beatty sequence for (3 + golden ratio).
%H Clark Kimberling, <a href="/A276855/b276855.txt">Table of n, a(n) for n = 0..10000</a>
%F a(n) = floor(n*(7 + sqrt(5))/2).
%t z = 500; r = 3+GoldenRatio; b = Table[Floor[k*r], {k, 0, z}]; (* A276855 *)
%Y Cf. A001950, A276868, A276888.
%K nonn,easy
%O 0,2
%A _Clark Kimberling_, Sep 24 2016
|
