OFFSET
1,2
PROG
(PARI) S=Set(); for(n=2, 50, k=0; m=1; while(k<n, m++; if(!setsearch(S, m)&&gcd(m, n)>1, S=setunion(S, [m]); if(k==0, print1(" ", m)); k++))) (Alekseyev)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Jun 01 2004
EXTENSIONS
More terms from Max Alekseyev, Jun 30 2005
STATUS
approved