login
A182218
Numbers derived as with Lucky Numbers, but beginning with the removal of every third number instead of every second.
1
1, 2, 4, 7, 8, 10, 14, 19, 20, 25, 28, 31, 32, 38, 43, 44, 46, 50, 58, 62, 64, 67, 70, 74, 85, 86, 88, 94, 98, 100, 106, 116, 121, 122, 133, 134, 136, 142, 145, 148, 151, 154, 163, 172, 176, 187, 188, 190, 199, 206, 212, 214, 217, 218, 226, 229, 230, 247, 248
OFFSET
1,2
LINKS
PROG
(Haskell) f = 1:2:(f' 4 $ skip 3 3 [3..])
f' c (n:r) = n:(f' (c + 1) $ skip n c r)
skip i c (l:r) | c == i = skip i 1 r ; | otherwise = l:(skip i (c + 1) r)
CROSSREFS
Cf. A000959.
Sequence in context: A039581 A367498 A338420 * A093701 A045601 A167051
KEYWORD
easy,nonn
AUTHOR
Jeremy Patrick List, Apr 19 2012
STATUS
approved