|
Search: id:A139456
|
|
|
| A139456 |
|
Numbers n such that primorial(n)/2 - 1024 is prime. |
|
+0
24
|
|
| 2, 3, 4, 5, 9, 10, 11, 16, 17, 20, 59, 96, 98, 318
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
k = 1; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k - 1024], 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: A118732 A118872 A046029 this_sequence A081869 A015837 A075177
Adjacent sequences: A139453 A139454 A139455 this_sequence A139457 A139458 A139459
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Apr 21 2008
|
|
|
Search completed in 0.002 seconds
|
