OFFSET
1,1
COMMENTS
The program lists the repeated occurrences. All but one repeated occurrence were removed manually.
PROG
(PARI) mx2pmp(n, m) = { v=vector(n+1); c=0; for(a=1, n, for(x=1, n, y = a*x^2+1; if(isprime(y), c++; v[c]=y; break); ); ); v1=vecsort(v); for(j=1, n, if(v1[j]<>0 && v1[j]==v1[j+1], print1(v1[j]", "))) }
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 18 2003
STATUS
approved