|
| |
|
|
A147853
|
|
Least prime p such that there is a prime q with (p+q)/2=A002110(n), the n-th primorial.
|
|
0
| |
|
|
5, 7, 11, 17, 19, 19, 29, 37, 37, 37, 73, 47, 59, 71, 97, 79, 79, 101, 97, 137, 227, 137, 109, 127, 151, 127, 151, 151, 179, 227, 431, 139, 211, 223, 337, 181, 251, 257, 313, 227, 257, 227, 263, 491, 307, 241, 409, 263, 277
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,1
|
|
|
COMMENTS
| Improved description from T. D. Noe (noe(AT)sspectra.com).
|
|
|
EXAMPLE
| For primorial=30, (p,q)=(7,53) as 7+53=2*30
|
|
|
PROG
| (PARI) ospp(N)= { i=4; while(1, Q=2*N-prime(i); if( ispseudoprime(2*N-prime(i)), print(N, ", ", prime(i) ); return(1) ); i++ ); \end WHILE }
|
|
|
CROSSREFS
| Cf. A002110, A147517
Sequence in context: A189320 A164316 A107448 * A111226 A168224 A084197
Adjacent sequences: A147850 A147851 A147852 * A147854 A147855 A147856
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Bill R McEachen (bmceache(AT)centralsan.org), Nov 15 2008
|
| |
|
|
