A140398 Numbers n such that A140397(n) = 0.

2, 5, 7, 10, 13, 15, 18, 23, 26, 28, 31, 34, 36, 39, 44, 47, 49, 52, 57, 60, 62, 65, 68, 70, 73, 78, 81, 83, 86, 89, 91, 94, 96, 99, 102, 104, 107, 112, 115, 117, 120, 123, 125, 128, 133, 136, 138, 141, 146, 149, 151, 154, 157, 159, 162, 167, 170, 172, 175, 178, 180

Offset: 1

Author

Fred Lunnon, Jun 20 2008

Keywords

• nonn

Programs

Mathematica

Select[Range[200],Floor[3*GoldenRatio*#]-3Floor[GoldenRatio*#]==0&] (* Harvey P. Dale, Feb 02 2017 *)

Extensions

Extended by Max Alekseyev, Apr 11 2009