AUTHOR
_J. H. Conway_.
_J. H. Conway_.
_Reinhard Zumkeller_, , <a href="/A045808/b045808.txt">Table of n, a(n) for n = 1..1000</a>
editing
approved
Select[Range[1300], MemberQ[{67, 69, 81, 83}, Mod[#, 100]]&] (* Harvey P. Dale, Jul 03 2013 *)
approved
editing
_Reinhard Zumkeller, _, <a href="/A045808/b045808.txt">Table of n, a(n) for n = 1..1000</a>
-- _Reinhard Zumkeller, _, Jan 23 2012
More terms from _Erich Friedman (erich.friedman(AT)stetson.edu)_.
proposed
approved
editing
proposed
(Haskell)
import Data.List (findIndices)
a045808 n = a045808_list !! (n-1)
a045808_list = findIndices (`elem` [67, 69, 81, 83]) $ cycle [0..99]
-- Reinhard Zumkeller, Jan 23 2012