login
A065927
Records in A065925.
3
5, 7, 114, 209, 493, 516, 855, 1194, 1274, 2815, 2834, 3180, 3186, 5225, 6010, 8056, 8357, 8954, 11439, 13684, 14599, 15748, 17298, 17384, 17784, 20940, 25886, 36223, 36938, 41796, 53725, 64855, 67942, 69167, 72468, 79143, 79516, 86232, 96845, 120708, 125709
OFFSET
1,1
PROG
(PARI) sopf(n) = local(fac, i); fac=factor(n); sum(i=1, matsize(fac)[1], fac[i, 1])
A065927(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(n, ", ")))} // Klaus Brockhaus
CROSSREFS
Sequence in context: A338525 A267586 A224507 * A217726 A016054 A158969
KEYWORD
nonn
AUTHOR
Jason Earls, Nov 28 2001
EXTENSIONS
More terms from David Wasserman, Sep 19 2002
More terms from Sean A. Irvine, Sep 21 2023
STATUS
approved