A187330 a(n) = floor((4-sqrt(5))*n); complement of A187339.

0, 1, 3, 5, 7, 8, 10, 12, 14, 15, 17, 19, 21, 22, 24, 26, 28, 29, 31, 33, 35, 37, 38, 40, 42, 44, 45, 47, 49, 51, 52, 54, 56, 58, 59, 61, 63, 65, 67, 68, 70, 72, 74, 75, 77, 79, 81, 82, 84, 86, 88, 89, 91, 93, 95, 97, 98, 100, 102, 104, 105, 107, 109, 111

Offset: 0

Author

Clark Kimberling, Mar 08 2011

Keywords

• nonn

Links

• Robert Israel, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A187339.

Programs

Maple

seq(floor((4-sqrt(5))*n),n=0..200); # Robert Israel, Dec 19 2021

Mathematica

Table[Floor[(4-5^(1/2))n], {n,0,120}]

Formula

a(n)=floor((4-sqrt(5))n).