|
%I #14 Sep 21 2023 01:46:48
%S 5,7,114,209,493,516,855,1194,1274,2815,2834,3180,3186,5225,6010,8056,
%T 8357,8954,11439,13684,14599,15748,17298,17384,17784,20940,25886,
%U 36223,36938,41796,53725,64855,67942,69167,72468,79143,79516,86232,96845,120708,125709
%N Records in A065925.
%o (PARI) sopf(n) = local(fac, i); fac=factor(n); sum(i=1,matsize(fac)[1],fac[i,1])
%o 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_
%Y Cf. A065925, A065926.
%K nonn
%O 1,1
%A _Jason Earls_, Nov 28 2001
%E More terms from _David Wasserman_, Sep 19 2002
%E More terms from _Sean A. Irvine_, Sep 21 2023
|
