|
| |
|
|
A075232
|
|
Numbers n such that n^9 is an interprime = average of two successive primes.
|
|
9
| |
|
|
9, 74, 110, 141, 340, 370, 411, 423, 546, 687, 720, 723, 725, 744, 813, 834, 966, 1033, 1054, 1137, 1178, 1233, 1264, 1284, 1287, 1320, 1335, 1460, 1636, 1642, 1768, 1934, 2046, 2053, 2064, 2103, 2214, 2397, 2447, 2465, 2486, 2496, 2510, 2716, 2741, 2775
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Interprimes are in A024675, even interprimes are in A072568, odd interprimes are in A072569 n^2 as interprimes are in A075190, n^3 as interprimes are in A075191, n^4 as interprimes are in A075192, n^5 as interprimes are in A075228, n^6 as interprimes are in A075229, n^7 as interprimes are in A075230, n^8 as interprimes are in A075231, n^10 as interprimes are in A075233, a(n) such that a(n)^n = smallest interprime (of the form a^n) are in A075234.
|
|
|
EXAMPLE
| 9 is a member because 9^9 = 387420489 is average of two successive primes 387420479 and 387420499.
|
|
|
MAPLE
| s := 9: for n from 2 to 1000 do if prevprime(n^s)+nextprime(n^s)=2*n^s then print(n) else; fi; od;
|
|
|
MATHEMATICA
| Select[ Range[2869], 2#^9 == PrevPrim[ #^9] + NextPrim[ #^9] &]
|
|
|
CROSSREFS
| Cf. A024675, A072568, A072569, A075190-A075192, A075228-A075234.
Sequence in context: A197534 A015465 A144782 * A145524 A037533 A178827
Adjacent sequences: A075229 A075230 A075231 * A075233 A075234 A075235
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Sep 09 2002
|
|
|
EXTENSIONS
| Edited by Robert G. Wilson v (rgwv(AT)rgwv.com) Sep 14 2002
|
| |
|
|
