login
A114081
sigma(n) plus the n-th prime gives a cube.
2
178, 185, 268, 548, 581, 2142, 9474, 17027, 17108, 66367, 71212, 155131, 230521, 296001, 318558, 335880, 555896, 620041, 1141190, 1158839, 1559606, 1650646, 2021877, 3274046, 3655189, 3668878, 4023383
OFFSET
1,1
EXAMPLE
sigma(155131)+p(155131)=2248091=131^3.
MATHEMATICA
Select[Range[4024000], IntegerQ[Surd[DivisorSigma[1, #]+Prime[#], 3]]&] (* Harvey P. Dale, Nov 01 2021 *)
PROG
(PARI) isok(n) = ispower(sigma(n) + prime(n), 3); \\ Michel Marcus, Jan 11 2014
CROSSREFS
Sequence in context: A189160 A053018 A046436 * A217037 A224600 A279093
KEYWORD
nonn
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved