1,1

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

A010052(a(n)) + A010054(a(n)) = 0. - Reinhard Zumkeller, May 13 2014

6 doesn't qualify because it's triangular; 9 doesn't qualify because it's square.

(Sage)

[x for x in [1..100] if not(is_square(x)) and not(is_triangular_number(x))] # Tom Edgar, May 13 2014

(Haskell)

a242401 n = a242401_list !! (n-1)

a242401_list = filter ((== 0) . a010054) a000037_list

-- Reinhard Zumkeller, May 13 2014

Cf. A000217, A000290.

Cf. A005214 (complement); intersection of A000037 and A014132.

Sequence in context: A005124 A160530 A214518 * A050941 A153083 A140592

Adjacent sequences: A242398 A242399 A242400 * A242402 A242403 A242404

nonn,easy

J. Lowell, May 13 2014

approved