|
| |
|
|
A138628
|
|
Positive integers n such that 17*n-7 is prime.
|
|
0
| |
|
|
4, 10, 12, 22, 24, 30, 34, 40, 48, 52, 54, 60, 72, 78, 88, 90, 100, 114, 118, 130, 132, 138, 144, 150, 160, 172, 178, 184, 192, 198, 204, 208, 214, 220, 222, 240, 250, 262, 264, 268, 270, 274, 282, 288, 292, 298, 312, 318, 324, 328, 342, 354, 358, 360, 372
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 17*4-7=61, 17*10-7=163, 17*12-7=197, 17*22-7=367, ...
|
|
|
MATHEMATICA
| a={}; Do[x=17*n-7; If[PrimeQ[x], AppendTo[a, n]], {n, 10^2}]; a
Select[Range[400], PrimeQ[17#-7]&] (* From Harvey P. Dale, Jan 06 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A199765 A065056 A080285 * A050868 A007319 A175436
Adjacent sequences: A138625 A138626 A138627 * A138629 A138630 A138631
|
|
|
KEYWORD
| nonn,changed
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), May 14 2008
|
|
|
EXTENSIONS
| Extended by Harvey P. Dale, Jan 06 2011
|
| |
|
|
