|
| |
|
|
A064483
|
|
Numbers n such that n^2 + p(n) and n^2 - p(n) are both prime.
|
|
1
| |
|
|
12, 30, 60, 96, 336, 660, 702, 756, 984, 990, 1188, 1302, 1488, 1830, 1866, 2070, 2142, 2340, 2586, 2874, 2910, 3618, 3714, 3750, 3774, 3906, 4008, 4470, 4512, 4902, 5094, 5754, 6012, 6174, 6432, 6840, 6846, 6930, 7446, 7578, 7734, 8064, 8190, 8328
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
EXAMPLE
| 12 is in the sequence because 144 +/- 37 = 181 and 107 which are both primes.
n=30: 30^2 = 900, prime(30) = 113, 900+113 = 1013 and 900-113 = 787, both prime.
|
|
|
MATHEMATICA
| Select[ Range[10^4], PrimeQ[ #^2 + Prime[ # ]] && PrimeQ[ #^2 - Prime[ # ]] &]
|
|
|
PROG
| (PARI) for(n=1, 20000, if(isprime(n^2+prime(n)) && isprime(n^2-prime(n)), print1(n, " ")))
(PARI) { n=0; default(primelimit, 6100000); for (m=1, 10^9, if (isprime(m^2 + prime(m)) && isprime(m^2 - prime(m)), write("b064483.txt", n++, " ", m); if (n==1000, break)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Sep 16 2009]
|
|
|
CROSSREFS
| Sequence in context: A120090 A086830 A084699 * A110019 A069486 A175157
Adjacent sequences: A064480 A064481 A064482 * A064484 A064485 A064486
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com) and Jason Earls (zevi_35711(AT)yahoo.com), Oct 05 2001
|
| |
|
|
