|
%I #32 Feb 14 2024 02:20:02
%S 1,15,191,2551,18813,94967,397627,1647135,7862009,45136639,292475319,
%T 1996813991,13877119093,96951759015,678328486451,4747732369423,
%U 33233199005169,232630924325999,1628414210130607,11398896079245015,79792267577612141,558545865884372695
%N a(n) = n^7 + 7*n + 7^n.
%H <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (15,-84,252,-462,546,-420,204,-57,7).
%F a(n) = A001015(n) + A008589(n) + A000420(n).
%F G.f.: (55*x^8+546*x^7+8966*x^6+14692*x^5+6726*x^4-694*x^3-50*x^2-1) / ((x-1)^8*(7*x-1)). - _Colin Barker_, May 09 2013
%e a(1) = 1^7 + 7*1 + 7^1 = 15.
%e a(2) = 2^7 + 7*2 + 7^2 = 191.
%t Table[n^7 + 7*n + 7^n, {n, 0, 30}] (* _T. D. Noe_, Dec 17 2012 *)
%o (Maxima) makelist(n^7 + 7*n + 7^n,n,0,20); /* _Martin Ettl_, Jan 15 2013 */
%Y Cf. A000420, A001015, A008589, A220425, A220509, A220511, A220703.
%K nonn,easy
%O 0,2
%A _Jonathan Vos Post_, Dec 15 2012
|
