1,1

A099302(a(n)) > 0.

Reinhard Zumkeller, Table of n, a(n) for n = 1..1000

(Haskell)

a239433 n = a239433_list !! (n-1)

a239433_list = filter

(\z -> any (== z) $ map a003415 $ takeWhile (<= a002620 z) a013929_list) [2..]

Cf. A098700 (complement), A002620.

Sequence in context: A294237 A162706 A088331 * A014091 A308040 A287961

Adjacent sequences: A239430 A239431 A239432 * A239434 A239435 A239436

nonn

Reinhard Zumkeller, Mar 18 2014

approved