%I #12 Jun 17 2017 00:32:43
%S 1,1730,5188,10375,17291,25936,36310,48413,62245,77806,95096,114115,
%T 134863,157340,181546,207481,235145,264538,295660,328511,363091,
%U 399400,437438,477205,518701,561926,606880,653563,701975,752116,803986,857585,912913
%N Centered 1729-gonal numbers.
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3, -3, 1).
%F a(n) = 1+(1729/2)*n+(1729/2)*n^2.
%p a:= n-> 1+(1729/2)*n*(1+n):
%p seq(a(n), n=0..35); # _Alois P. Heinz_, Jul 16 2013
%t LinearRecurrence[{3,-3,1},{1,1730,5188},40] (* or *) Table[1+(1729/2)n(n+1), {n,0,40}] (* _Harvey P. Dale_, May 22 2017 *)
%o (PARI) a(n) = 1 + (1729/2)*n + (1729/2)*n^2 \\ _Michel Marcus_, Jul 16 2013
%Y Cf. A130859.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_, Oct 06 2007, based on a suggestion from Anton Mravcek in 2004.
|