A065926 Index values for new maxima in A065925.

1, 3, 5, 21, 25, 35, 55, 185, 265, 563, 569, 733, 3350, 3469, 6010, 6779, 10689, 11143, 14505, 18016, 30561, 31588, 37757, 59611, 65816, 67106, 75904, 118361, 214379, 241564, 255196, 414221, 648152, 703812, 881848, 1153107, 1277048, 1407769, 1719552, 1775846, 2722607, 3177728

Offset: 1

Author

Jason Earls, Nov 28 2001

Keywords

• nonn

References

• J. Earls, Mathematical Bliss, Pleroma Publications, 2009, pages 99-100. ASIN: B002ACVZ6O [From Jason Earls, Nov 26 2009]

Crossrefs

Cf. A065925, A065927.

Programs

PARI

sopf(n) = local(fac, i); fac=factor(n); sum(i=1,matsize(fac)[1],fac[i,1])
A065926(m)= {local(a,n,k); a=0; for(k=1,m,n=1; while(sopf(n)!=sopf(n+k), n++); if(n>a,a=n; print1(k,",")))} \\ Klaus Brockhaus

Extensions

More terms from David Wasserman, Sep 19 2002

More terms from Sean A. Irvine, Sep 20 2023