This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A163763 #17 May 06 2016 12:59:53 %S A163763 1,11,31,341,1729,2821,19019,31031,43617,43491,68961,72219,82677, %T A163763 86583,117831,117831,187131,347529,347529,479787,503347,414309,436107, %U A163763 496713,478401,503347,758571,794409,909447,952413,658749,696787,696787 %N A163763 Sqrt(sigma(A008847(n)^2)), where A008847 lists m such that sigma(m^2) is a square. %C A163763 Note that a(k)=a(k+1) for k=15, 18, 32, 90, 231,... - _Zak Seidov_, May 02 2016 %H A163763 Zak Seidov and Donovan Johnson, <a href="/A163763/b163763.txt">Table of n, a(n) for n = 1..400</a> (first 161 terms from Zak Seidov) %t A163763 Select[Sqrt@ DivisorSigma[1, #^2] &@ Range[10^6], IntegerQ] (* _Michael De Vlieger_, May 02 2016, after _Harvey P. Dale_ at A008847 *) %o A163763 (PARI) lista(nn) = {for (n=1, nn, if (issquare(s = sigma(n^2)), print1(sqrtint(s), ", ")););} \\ _Michel Marcus_, May 02 2016 %Y A163763 Cf. A163764. %K A163763 nonn %O A163763 1,2 %A A163763 _M. F. Hasler_, Aug 03 2009