A015515 a(1) = 1, a(n) = Sum_{k=1..n-1} ((12^k - 1)/11)*a(k).
1, 1, 14, 2212, 4171832, 94375183504, 25618521062894816, 83450744014073963641408, 3262026661649164626974053098368, 1530121919008888925087797696409496422656, 8612828743790947623482719127044813092555596516864
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..44
Crossrefs
Programs
-
Magma
[n le 2 select 1 else ((12^(n-1) + 10)/11) * Self(n-1): n in [1..15]]; // Vincenzo Librandi, Nov 12 2012
-
Mathematica
Join[{1},RecurrenceTable[{a[2]==1,a[n]==(12^(n-1)+10)/11 a[n-1]},a,{n,12}]] (* Harvey P. Dale, Mar 10 2013 *)
-
SageMath
def a(n, m) -> int: # a = A015515 return 1 if (n<3) else (m^(n-1)+m-2)*a(n-1, m)//(m-1) [a(n, 12) for n in range(1,31)] # G. C. Greubel, May 03 2023
Formula
a(n) = ((12^(n-1) + 10)/11) * a(n-1). - Vincenzo Librandi, Nov 12 2012