%I #15 Aug 30 2022 02:08:04
%S 0,2,6,15,24,40,60,77,104,135,160,198,228,273,322,360,416,476,522,589,
%T 640,714,792,851,936,1000,1092,1188,1260,1363,1470,1550,1664,1749,
%U 1870,1995,2088,2220,2318,2457,2600,2706,2856,3010,3124,3285,3404,3572,3744
%N Golden rectangle numbers: n * A007067(n).
%H Amiram Eldar, <a href="/A050508/b050508.txt">Table of n, a(n) for n = 0..10000</a>
%p A050508:=n->n*round(n*(1+sqrt(5))/2); seq(A050508(n), n=0..100); # _Wesley Ivan Hurt_, Nov 27 2013
%t a[n_] := n*Round[n*GoldenRatio]; Table[a[n], {n, 0, 48}] (* _Jean-François Alcover_, Jun 27 2012 *)
%o (Python)
%o from math import isqrt
%o def A050508(n): return n*((isqrt(5*n**2<<2)>>1)+n+1>>1) # _Chai Wah Wu_, Aug 29 2022
%Y Cf. A007067.
%K easy,nice,nonn
%O 0,2
%A Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Dec 28 1999
|