A182218 Numbers derived as with Lucky Numbers, but beginning with the removal of every third number instead of every second.

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

Jeremy Patrick List, Table of n, a(n) for n = 1..2000

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: A047236 A039581 A338420 * A093701 A045601 A167051

Adjacent sequences: A182215 A182216 A182217 * A182219 A182220 A182221

Keyword

easy,nonn

Author

Jeremy Patrick List, Apr 19 2012

Status

approved