|
%I #27 Mar 02 2023 14:22:40
%S 0,3,44,279,1104,3275,8028,17199,33344,59859,101100,162503,250704,
%T 373659,540764,762975,1052928,1425059,1895724,2483319,3208400,4093803,
%U 5164764,6449039,7977024,9781875,11899628,14369319,17233104,20536379,24327900,28659903,33588224,39172419,45475884
%N a(n) = n^5 + n^3 + n^2.
%C Exponents are prime numbers in decreasing order.
%H Ivan Panchenko, <a href="/A133073/b133073.txt">Table of n, a(n) for n = 0..1000</a>
%F G.f.: x*(3 + 26*x + 60*x^2 + 30*x^3 + x^4)/(1-x)^6. - _R. J. Mathar_, Nov 14 2007
%F a(n) = n^2*(n^3 + n + 1). - _Wesley Ivan Hurt_, Mar 02 2023
%e a(7) = 17199 because 7^5 = 16807, 7^3 = 343, 7^2 = 49 and we can write 16807 + 343 + 49 = 17199.
%t Total[#^{5,3,2}]&/@Range[0,40] (* _Harvey P. Dale_, Jan 18 2011 *)
%o (Magma)[n^5+n^3+n^2: n in [0..50]] // _Vincenzo Librandi_, Dec 15 2010
%o (PARI) for(n=0,50, print1(n^5 + n^3 + n^2, ", ")) \\ _G. C. Greubel_, Oct 20 2017
%Y Cf. A000290, A000578, A000584, A011379, A045991, A100019.
%Y Cf. A133070, A133071, A133072.
%K nonn
%O 0,2
%A _Omar E. Pol_, Nov 01 2007
%E More terms from _Vincenzo Librandi_, Dec 15 2010
|
