|
Search: id:A139444
|
|
|
| A139444 |
|
Numbers n such that primorial(n)/2 - 16 is prime. |
|
+0
24
|
|
| 2, 4, 7, 9, 13, 22, 26, 30, 33, 36, 38, 42, 114, 125, 126, 181
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
k = 1; a = {}; Do[k = k*Prime[n]; If[PrimeQ[k - 16], Print[n]; AppendTo[a, n]], {n, 2, 752}]; 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: A036386 A099847 A014817 this_sequence A090893 A100486 A139533
Adjacent sequences: A139441 A139442 A139443 this_sequence A139445 A139446 A139447
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Artur Jasinski (grafix(AT)csl.pl), Apr 21 2008
|
|
|
Search completed in 0.002 seconds
|
