|
%I #9 Sep 08 2022 08:45:39
%S 0,0,2,5,9,15,22,30,39,50,61,74,88,104,121,139,158,178,200,223,247,
%T 272,299,326,355,386,417,450,484,519,556,593,632,673,714,757,800,846,
%U 892,940,988,1038,1090,1142,1196,1251,1307,1365,1423,1483,1545,1607,1671
%N a(n) = floor((n^2)/phi).
%H G. C. Greubel, <a href="/A152738/b152738.txt">Table of n, a(n) for n = 0..5000</a>
%t a[n_]:=Floor[(n^2)/GoldenRatio];
%o (PARI) a(n)=n^2\((1+sqrt(5))/2) \\ _Charles R Greathouse IV_, Jul 29 2011
%o (Magma) phi:=(1+Sqrt(5))/2; [Floor(n^2/phi): n in [0..30]]; // _G. C. Greubel_, Sep 01 2018
%Y Cf. A014217, A152737, A032616, A032635.
%K nonn
%O 0,3
%A _Vladimir Joseph Stephan Orlovsky_, Dec 12 2008
%E Offset corrected by B. D. Swan, Jan 03 2009
|
