OFFSET
1,2
PROG
(PARI) {s=[1]; for(n=2, 335, a=s[n-1]; if(!isprime(a), print1(a, ", ")); s=[a+1]; for(j=2, n, k=s[j-1]+1; c=1; while(c>0, b=1; for(i=1, matsize(s)[2], if(gcd(k, s[i])>1, b=0)); if(b==0, k++, c=0)); s=concat(s, k)))}
CROSSREFS
KEYWORD
nonn
AUTHOR
Klaus Brockhaus, Dec 10 2002
STATUS
approved