|
| |
|
|
A104493
|
|
Numbers n for which the cube excess of the n-th prime is prime.
|
|
0
| |
|
|
2, 5, 6, 8, 10, 19, 20, 23, 26, 28, 31, 48, 49, 50, 51, 52, 55, 56, 57, 59, 61, 65, 66, 99, 100, 105, 110, 112, 114, 117, 121, 125, 127, 170, 171, 173, 178, 184, 185, 186, 190, 192, 194, 196, 200, 201, 206, 208, 214, 270, 271, 272, 274, 277, 278, 279, 280, 282
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
FORMULA
| n such that A055400(A000040(n)) is an element of A000040. n such that A104492(n) is prime.
|
|
|
EXAMPLE
| 99 is an element of this sequence because the 99th prime is 523, 523 - 8^3 = 523-512 = 11 and 11 is prime. 100 is in this sequence because the 100th prime is 541 and 541-8^3 = 29, which is prime.
|
|
|
MATHEMATICA
| f[n_] := Block[{k = 1, p = Prime[n]}, While[k^3 < p, k++ ]; p - (k - 1)^3]; Select[ Range[ 284], PrimeQ[ f[ # ]] &] (from Robert G. Wilson v Mar 19 2005)
|
|
|
CROSSREFS
| Cf. A000040, A053186, A055400, A056892, A102821, A104492.
Sequence in context: A121411 A047441 A081083 * A139532 A024798 A108857
Adjacent sequences: A104490 A104491 A104492 * A104494 A104495 A104496
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Jonathan Vos Post (jvospost3(AT)gmail.com), Mar 19 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 19 2005
|
| |
|
|
