OFFSET
1,1
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (1,0,0,1,-1).
FORMULA
G.f.: x*(9+32*x+22*x^2+24*x^3+13*x^4)/(1-x-x^4+x^5). - Colin Barker, Jan 23 2012
MATHEMATICA
Select[Range[1250], MemberQ[{9, 41, 63, 87}, Mod[#, 100]]&] (* Harvey P. Dale, Aug 01 2020 *)
PROG
(Haskell)
import Data.List (findIndices)
a045804 n = a045804_list !! (n-1)
a045804_list = findIndices (`elem` [9, 41, 63, 87]) $ cycle [0..99]
-- Reinhard Zumkeller, Jan 23 2012
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
EXTENSIONS
More terms from Erich Friedman.
STATUS
approved