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 A046656 #17 Aug 12 2023 04:37:06 %S A046656 1,50,290,290,850,1690,1690,2210,4930,6710,9802,10660,22100,24650, %T A046656 22100,28730,38918,48100,48100,68900,68900,114070,128180,188500, %U A046656 188500,246500,226798,246500,278980,404260,399620,490100,640900,640900,817700,746980,906100 %N A046656 Square roots of sums of squares of divisors in A046655. %H A046656 Amiram Eldar, <a href="/A046656/b046656.txt">Table of n, a(n) for n = 1..1000</a> (terms 1..500 from Donovan Johnson) %F A046656 a(n) = sqrt(A001157(A046655(n))). - _Amiram Eldar_, Aug 12 2023 %t A046656 Select[Sqrt[DivisorSigma[2, #]] & /@ Range[750000], IntegerQ] (* _Jayanta Basu_, Jun 27 2013 *) %Y A046656 Cf. A001157, A046655. %K A046656 nonn %O A046656 1,2 %A A046656 _Labos Elemer_