|
|
A071923
|
|
Prime such that pi{x^2,(x+1)^2+1}=pi{(x+1)^2,p}.
|
|
0
|
|
|
7, 13, 19, 37, 41, 67, 73, 101, 107, 149, 163, 193, 227, 239, 281, 337, 353, 397, 433, 479, 523, 577, 607, 677, 733, 769, 829, 907, 953, 1013, 1091, 1151, 1229, 1289, 1373, 1439, 1489, 1601, 1667, 1777, 1867, 1907, 2027, 2099, 2237, 2281, 2389, 2543, 2591
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(1)=7 because pi(1,4)=2 and pi(4,7)=2
|
|
PROG
|
(PARI) pi(m, n)=local(i, pic); pic=0; forprime (i=m, n, pic++); pic; for (x=1, 500, xc=0; px=pi(x^2, (x+1)^2); forprime (y=(x+1)^2, 100000, xc++; if (xc==px, write1("primeSquared.txt", y, ", "); break)))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|