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 A065522 #14 Sep 04 2023 19:57:19 %S A065522 21,93,381,1065,1173,5065,5670,5729,6603,8809,10281,10680,15960,17110, %T A065522 39286,40526,47882,49951,61962,85058,85261,99066,117860,125985,126853, %U A065522 135890,143241,159901,171945,179556,185853,208744,209585,210450,251394,261767,288792 %N A065522 Numbers k such that sigma(k) and sigma(k+1) are nontrivial powers (A065496). %e A065522 10680 is in this sequence because sigma(10680)=180^2 and sigma(10681)=108^2. - _Sean A. Irvine_, Sep 04 2023 %t A065522 nn = 300000; SequencePosition[Array[GCD @@ FactorInteger[DivisorSigma[1, #]][[All, -1]] &, nn + 1], {_?(# > 1 &), _?(# > 1 &)}][[All, 1]] (* _Michael De Vlieger_, Sep 04 2023 *) %Y A065522 Cf. A065496. %K A065522 nonn %O A065522 1,1 %A A065522 _Robert G. Wilson v_, Nov 27 2001 %E A065522 Missing terms inserted by _Sean A. Irvine_, Sep 04 2023