|
|
A178510
|
|
a(n+1) = a(n)*100 + 21^n, with a(1)=1.
|
|
4
|
|
|
1, 121, 12541, 1263361, 126530581, 12657142201, 1265799986221, 126581799710641, 12658217793923461, 1265822573672392681, 126582274047120246301, 12658227754989525172321, 1265822782854780028618741, 126582278439950380600993561, 12658227847238957992620864781
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Related to decimal expansion of fraction 1/79 and Pell numbers.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Rest[RecurrenceTable[{a[0]==0, a[n]==100a[n-1]+21^(n-1)}, a[n], {n, 15}]] (* or *) LinearRecurrence[{121, -2100}, {1, 121}, 20] (* Harvey P. Dale, Sep 09 2011 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Removed vacuous a(0)=0 from NAME. - R. J. Mathar, Jun 19 2021
|
|
STATUS
|
approved
|
|
|
|