OFFSET
0,1
LINKS
Index entries for linear recurrences with constant coefficients, signature (111,-1110,1000).
MATHEMATICA
Join[{14}, Table[FromDigits[Join[PadRight[{3}, n, 0], {8}, PadLeft[{3}, n, 0]]], {n, 20}]] (* or *) LinearRecurrence[{111, -1110, 1000}, {14, 383, 30803}, 20] (* Harvey P. Dale, Jul 30 2025 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Dec 16 2009
STATUS
approved
