A072596 Nonsquares with A072594(n) = 0.

70, 280, 630, 646, 1120, 1750, 1798, 2145, 2520, 2584, 3430, 3526, 4480, 5670, 5814, 5865, 6006, 7000, 7192, 8470, 8580, 9177, 10080, 10336, 11305, 11830, 13110, 13720, 14104, 15750, 16150, 16182, 16422, 17920, 19305, 20230, 20553, 20806

Offset

1,1

Comments

a010052(a(n)) = 0. - Reinhard Zumkeller, Nov 17 2012

Links

Reinhard Zumkeller and Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 1000 terms from Zumkeller)

Prog

(Haskell)
a072596 n = a072596_list !! (n-1)
a072596_list = filter ((== 0) . a010052) a072595_list
-- Reinhard Zumkeller, Nov 17 2012
(PARI) is(n)=if(issquare(n), return(0)); my(f=factor(n), t); for(i=1, #f~, if(f[i, 2]%2, t=bitxor(t, f[i, 1]))); t==0 \\ Charles R Greathouse IV, Aug 28 2016

Crossrefs

Cf. A072595.

Sequence in context: A234557 A245857 A227879 * A309310 A330702 A335861

Adjacent sequences: A072593 A072594 A072595 * A072597 A072598 A072599

Keyword

nonn

Author

Reinhard Zumkeller, Jun 23 2002

Status

approved