OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..200
Richard Blecksmith and Charles Nicol, Monotonic Numbers, Mathematics Magazine, 66, (1993), 257-262.
Index entries for linear recurrences with constant coefficients, signature (111,-1110,1000).
FORMULA
a(n) = (8*100^n - 7*10^n - 1)/9.
G.f.: 9*x*(-9+20*x) / ( (x-1)*(100*x-1)*(10*x-1) ). - R. J. Mathar, Feb 28 2011
MATHEMATICA
Table[(8*100^n - 7*10^n - 1)/9, {n, 0, 30}] (* G. C. Greubel, Nov 02 2018 *)
FromDigits/@Table[Join[PadRight[{}, n, 8], PadRight[{}, n, 1]], {n, 0, 15}] (* or *) LinearRecurrence[ {111, -1110, 1000}, {0, 81, 8811}, 15] (* Harvey P. Dale, Jul 03 2023 *)
PROG
(Magma) [(8*100^n-7*10^n-1)/9: n in [0..20]]; // Vincenzo Librandi, Aug 04 2011
(PARI) vector(30, n, n--; (8*100^n - 7*10^n - 1)/9) \\ G. C. Greubel, Nov 02 2018
(Python)
for n in range(30):
print((8*100**n-7*10**n-1)//9, end=', ')
# Stefano Spezia, Nov 02 2018
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Paul Curtz, Feb 13 2011
STATUS
approved