OFFSET
1,1
LINKS
Zak Seidov and Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
EXAMPLE
Array begins
1 2 4 7 8 10 12 ...
.3 6 11 15 18 ...
. 9 17 26 33 ...
PROG
(Haskell)
a056234 n = a056234_list !! (n-1)
a056234_list = notUsed 1 a056231_list a056232_list a056233_list where
notUsed x us'@(u:us) vs'@(v:vs) ws'@(w:ws)
| x == u = notUsed (x + 1) us vs' ws'
| x == v = notUsed (x + 1) us' vs ws'
| x == w = notUsed (x + 1) us' vs' ws
| otherwise = x : notUsed (x + 1) us' vs' ws'
-- Reinhard Zumkeller, Nov 07 2011
CROSSREFS
KEYWORD
nonn,nice,easy
AUTHOR
N. J. A. Sloane, E. M. Rains, Aug 22 2000
STATUS
approved