login
A078877
Nonprimes in A078447.
0
1, 689, 15229, 20569, 24139, 43531, 44377, 47077, 47941, 66767, 73441, 80419, 86447, 117739, 164783, 175793, 192433, 194321, 196283, 261853, 282533, 302083, 316933, 319373, 372091, 380431, 414863, 429713, 444361, 450613, 456853, 472547
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
Sequence in context: A204153 A204146 A259512 * A204145 A284284 A115177
KEYWORD
nonn
AUTHOR
Klaus Brockhaus, Dec 10 2002
STATUS
approved