A140398 - OEIS

%I #8 Feb 02 2017 14:01:47

%S 2,5,7,10,13,15,18,23,26,28,31,34,36,39,44,47,49,52,57,60,62,65,68,70,

%T 73,78,81,83,86,89,91,94,96,99,102,104,107,112,115,117,120,123,125,

%U 128,133,136,138,141,146,149,151,154,157,159,162,167,170,172,175,178,180

%N Numbers n such that A140397(n) = 0.

%t Select[Range[200],Floor[3*GoldenRatio*#]-3Floor[GoldenRatio*#]==0&] (* _Harvey P. Dale_, Feb 02 2017 *)

%K nonn

%O 1,1

%A _Fred Lunnon_, Jun 20 2008

%E Extended by _Max Alekseyev_, Apr 11 2009