OFFSET
1,2
LINKS
Index entries for linear recurrences with constant coefficients, signature (0,1,0,0,0,0,0,10,0,-10).
FORMULA
From Chai Wah Wu, Oct 21 2024: (Start)
a(n) = a(n-2) + 10*a(n-8) - 10*a(n-10) for n > 15.
G.f.: x*(-10*x^14 - 20*x^13 - 20*x^12 - 20*x^11 - 20*x^10 - 10*x^9 + 20*x^8 + 30*x^7 + 14*x^6 + 4*x^5 + 4*x^4 + 4*x^3 + 4*x^2 + 3*x + 1)/((x - 1)*(x + 1)*(10*x^8 - 1)). (End)
PROG
(Haskell)
import Data.List (intersect)
a229364 n = a229364_list !! (n-1)
a229364_list = f "" [1, 3 ..] where
f xs (o:os) = if null $ intersect xs ys then o : f ys os else f xs os
where ys = show o
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Reinhard Zumkeller, Sep 21 2013
STATUS
approved