login

Revision History for A045808

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
8-ish numbers (end in 67, 69, 81, 83).
(history; published version)
#18 by N. J. A. Sloane at Mon Nov 04 12:19:17 EST 2013
AUTHOR

_J. H. Conway_.

Discussion
Mon Nov 04
12:19
OEIS Server: https://oeis.org/edit/global/2049
#17 by Charles R Greathouse IV at Sat Jul 13 12:02:05 EDT 2013
LINKS

_Reinhard Zumkeller_, , <a href="/A045808/b045808.txt">Table of n, a(n) for n = 1..1000</a>

Discussion
Sat Jul 13
12:02
OEIS Server: https://oeis.org/edit/global/1934
#16 by Harvey P. Dale at Wed Jul 03 18:12:23 EDT 2013
STATUS

editing

approved

#15 by Harvey P. Dale at Wed Jul 03 18:12:18 EDT 2013
MATHEMATICA

Select[Range[1300], MemberQ[{67, 69, 81, 83}, Mod[#, 100]]&] (* Harvey P. Dale, Jul 03 2013 *)

STATUS

approved

editing

#14 by N. J. A. Sloane at Fri Feb 22 21:36:54 EST 2013
LINKS

_Reinhard Zumkeller, _, <a href="/A045808/b045808.txt">Table of n, a(n) for n = 1..1000</a>

PROG

-- _Reinhard Zumkeller, _, Jan 23 2012

Discussion
Fri Feb 22
21:36
OEIS Server: https://oeis.org/edit/global/1866
#13 by Russ Cox at Sat Mar 31 13:22:19 EDT 2012
EXTENSIONS

More terms from _Erich Friedman (erich.friedman(AT)stetson.edu)_.

Discussion
Sat Mar 31
13:22
OEIS Server: https://oeis.org/edit/global/887
#12 by T. D. Noe at Mon Jan 23 16:33:45 EST 2012
STATUS

proposed

approved

#11 by Reinhard Zumkeller at Mon Jan 23 14:23:14 EST 2012
STATUS

editing

proposed

#10 by Reinhard Zumkeller at Mon Jan 23 14:23:03 EST 2012
CROSSREFS
#9 by Reinhard Zumkeller at Mon Jan 23 13:18:59 EST 2012
PROG

(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