|
|
A125833
|
|
Numbers whose base-5 representation is 333333.......3.
|
|
5
|
|
|
0, 3, 18, 93, 468, 2343, 11718, 58593, 292968, 1464843, 7324218, 36621093, 183105468, 915527343, 4577636718, 22888183593, 114440917968, 572204589843, 2861022949218, 14305114746093, 71525573730468, 357627868652343
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 3*(5^n - 1)/4.
G.f.: 3*x/((1-x)*(1-5*x)).
E.g.f.: 3*(exp(5*x) - exp(x))/4. (End)
|
|
EXAMPLE
|
Base 5.................decimal
0.........................0
3.........................3
33.......................18
333......................93
3333....................468
33333..................2343
333333................11718
3333333...............58593
33333333.............292968, etc.
|
|
MAPLE
|
seq(3*(5^n-1)/4, n=0..30);
|
|
MATHEMATICA
|
Table[FromDigits[PadRight[{}, n, 3], 5], {n, 0, 30}] (* or *) LinearRecurrence[ {6, -5}, {0, 3}, 30] (* Harvey P. Dale, Sep 23 2016 *)
|
|
PROG
|
(PARI) vector(30, n, n--; 3*(5^n -1)/4) \\ G. C. Greubel, Aug 03 2019
(Magma) [3*(5^n -1)/4: n in [0..30]]; // G. C. Greubel, Aug 03 2019
(Sage) [3*(5^n -1)/4 for n in (0..30)] # G. C. Greubel, Aug 03 2019
(GAP) List([0..30], n-> 3*(5^n -1)/4); G. C. Greubel, Aug 03 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|