|
%I #7 Mar 10 2015 10:50:36
%S 1,4,5,6,8,19,20,21,23,27,28,35,48,50,53,59,79,83,86,91,113,127,133,
%T 143,148,153,158,164,177,180,181,186,188,189,191,193,198,207,213,219,
%U 220,225,227,233,235,237,241,254,258,260,265,274,276,277,296,297,306
%N Numbers n such that A072475(n) divides A071221(n).
%o (PARI) k=3; for(n=1, 500, p=1; s=0; for(i=1, n, while(isprime(k), k=k+1); p=p*k; s=s+k; k=k+1); if(p%s==0, print1(n", ")))
%K nonn
%O 1,2
%A _Ralf Stephan_, Mar 24 2003
|
