1,2

(PARI) for(n=1, 3000, x=sum(k=1, n, sigma(k)); if(issquare(x), print(x), ))

(PARI) { n=0; for (m=1, 10^5, x=sum(k=1, m, sigma(k)); if (issquare(x), write("b062407.txt", n++, " ", x); if (n==8, break)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Aug 07 2009]

Sequence in context: A160300 A024060 A004815 this_sequence A097476 A047676 A079187

Adjacent sequences: A062404 A062405 A062406 this_sequence A062408 A062409 A062410

nonn

Jason Earls (zevi_35711(AT)yahoo.com), Jul 08 2001

Terms a(7) and a(8) added by Harry J. Smith (hjsmithh(AT)sbcglobal.net), Aug 07 2009