cp's OEIS Frontend

A024568 a(n) = [ n/{n*r} ], where r = (1 + sqrt(5))/2 and {x} := x - [ x ].

%I A024568 #8 Aug 03 2014 14:27:15
%S A024568 1,8,3,8,55,8,21,8,16,55,13,28,377,21,55,18,33,144,25,55,21,36,107,28,
%T A024568 55,377,39,91,31,55,194,41,83,2584,55,144,42,78,377,55,120,43,74,227,
%U A024568 55,107,987,72,172,55,98,377,70,144,55,91,250,68,127,731,87,194,67,115,377,83,164
%N A024568 a(n) = [ n/{n*r} ], where r = (1 + sqrt(5))/2 and {x} := x - [ x ].
%H A024568 Clark Kimberling, <a href="/A024568/b024568.txt">Table of n, a(n) for n = 1..1000</a>
%t A024568 Table[Floor[n/FractionalPart[n*GoldenRatio]], {n, 1100}] (* _Clark Kimberling_, Aug 15 2012 *)
%Y A024568 Cf. A024569.
%K A024568 nonn
%O A024568 1,2
%A A024568 _Clark Kimberling_