A015512 a(1) = 1, a(n) = Sum_{k=1..n-1} ((10^k - 1)/9)*a(k).

1, 1, 12, 1344, 1494528, 16607195136, 1845258665951232, 2050289046842405289984, 22780991231839211526404702208, 2531221268231904597902043824359735296, 2812468078063201791652852780757078172764209152

Offset: 1

Author

Olivier Gérard

Keywords

• nonn
• easy

Links

• G. C. Greubel, Table of n, a(n) for n = 1..46

Crossrefs

Sequences with the recurrence a(n) = (m^(n-1) + m-2)*a(n-1)/(m-1): A036442 (m=2), A015502 (m=3), A015503 (m=4), A015506 (m=5), A015507 (m=6), A015508 (m=7), A015509 (m=8), A015511 (m=9), this sequence (m=10), A015513 (m=11), A015515 (m=12).

Programs

Magma

[n le 2 select 1 else ((10^(n-1) + 8)/9)*Self(n-1): n in [1..15]]; // Vincenzo Librandi, Nov 12 2012

Mathematica

a[n_, m_]:= a[n, m]= If[n<3, 1, (m^(n-1) +m-2)*a[n-1,m]/(m-1)];
Table[a[n, 10], {n, 30}] (* G. C. Greubel, May 03 2023 *)

SageMath

@CachedFunction # a = A015512
def a(n, m): return 1 if (n<3) else (m^(n-1)+m-2)*a(n-1, m)/(m-1)
[a(n,10) for n in range(1, 31)] # G. C. Greubel, May 03 2023

Formula

a(n) = ((10^(n-1) + 8)/9) * a(n-1). - Vincenzo Librandi, Nov 12 2012