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 A114070 #10 Oct 22 2023 11:51:10 %S A114070 13,76,280,4258,4719,4887,12207,13106,41823,42804,51671,54261,56283, %T A114070 65512,77671,95139,98219,135724,147440,149176,177911,220546,239599, %U A114070 279145,285347,285957,299432,308503,312137,335106,350739,525429,611123,634600,663377,700064 %N A114070 sigma(n) + n is a cube. %e A114070 sigma(13) + 13 = 27 = 3^3. %t A114070 Select[Range[701100],IntegerQ[Surd[DivisorSigma[1,#]+#,3]]&] (* _Harvey P. Dale_, Oct 22 2023 *) %o A114070 (PARI) isok(n) = ispower(sigma(n) + n, 3); \\ _Michel Marcus_, Jan 22 2014 %Y A114070 Cf. A155085. %K A114070 nonn %O A114070 1,1 %A A114070 _Giovanni Resta_, Feb 13 2006 %E A114070 More terms from _Michel Marcus_, Jan 22 2014