OFFSET
0,2
LINKS
Index entries for linear recurrences with constant coefficients, signature (111,-1110,1000).
FORMULA
MAPLE
A332141 := n -> 4*(10^(2*n+1)-1)/9-3*10^n;
MATHEMATICA
Array[4 (10^(2 # + 1)-1)/9 - 3*10^# &, 15, 0]
LinearRecurrence[{111, -1110, 1000}, {1, 414, 44144}, 20] (* or *) Table[ FromDigits[Join[PadRight[{}, n, 4], {1}, PadRight[{}, n, 4]]], {n, 0, 20}](* Harvey P. Dale, Aug 17 2020 *)
PROG
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
M. F. Hasler, Feb 09 2020
STATUS
approved