login
A024124
a(n) = 10^n - n^10.
4
1, 9, -924, -58049, -1038576, -9665625, -59466176, -272475249, -973741824, -2486784401, 0, 74062575399, 938082635776, 9862141508151, 99710745345024, 999423349609375, 9998900488372224, 99997984006099551, 999996429532773376
OFFSET
0,2
LINKS
FORMULA
From Chai Wah Wu, Jan 26 2020: (Start)
a(n) = 21*a(n-1) - 165*a(n-2) + 715*a(n-3) - 1980*a(n-4) + 3762*a(n-5) - 5082*a(n-6) + 4950*a(n-7) - 3465*a(n-8) + 1705*a(n-9) - 561*a(n-10) + 111*a(n-11) - 10*a(n-12) for n > 11.
G.f.: (9*x^11 + 10140*x^10 + 477332*x^9 + 4504245*x^8 + 12648018*x^7 + 11793648*x^6 + 3241104*x^5 + 23538*x^4 - 37875*x^3 - 948*x^2 - 12*x + 1)/((x - 1)^11*(10*x - 1)). (End)
MATHEMATICA
lst={}; Do[AppendTo[lst, 10^n-n^10], {n, 0, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jan 15 2009 *)
Table[10^n-n^10, {n, 0, 20}] (* Harvey P. Dale, Apr 22 2018 *)
PROG
(Magma) [10^n-n^10: n in [0..20]]; // Vincenzo Librandi, Jun 30 2011
KEYWORD
sign,easy
STATUS
approved