|
| |
|
|
A139454
|
|
Numbers n such that primorial(n)/2 - 512 is prime.
|
|
24
| |
|
|
2, 5, 6, 9, 10, 11, 12, 17, 18, 23, 36, 48, 62, 87, 112, 131
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| k = 1; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k - 512], Print[n]; AppendTo[a, n]], {n, 2, 325}]; a (*Artur Jasinski*)
|
|
|
CROSSREFS
| Cf. A067026, A067027, A139439, A139440, A139441, A139442, A139443, A139444, A139445, A139446, A139447, A139448, A139449, A139450, A139451, A139452, A139453, A139454, A139455, A139456, A139457, A103514.
Sequence in context: A136369 A007573 A143909 * A171888 A028946 A031461
Adjacent sequences: A139451 A139452 A139453 * A139455 A139456 A139457
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Apr 21 2008
|
| |
|
|
