|
| |
|
|
A178387
|
|
Primes p such that q*p+-Mod(p,q) are primes, for q=7.
|
|
1
|
|
|
|
41, 419, 839, 1259, 1889, 2239, 3541, 4801, 5039, 5711, 6229, 7349, 7699, 7741, 9239, 10429, 10891, 11171, 11801, 12809, 13159, 14629, 15889, 16631, 16981, 17891, 18661, 18899, 20089, 21559, 21601, 22651, 22679, 23981, 24989, 25969, 26879
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
7*41=287+-6->primes,..
|
|
|
LINKS
|
Table of n, a(n) for n=1..37.
|
|
|
MATHEMATICA
|
q=7; lst={}; Do[p=Prime[n]; If[PrimeQ[q*p-Mod[p, q]]&&PrimeQ[q*p+Mod[p, q]], AppendTo[lst, p]], {n, 8!}]; lst
|
|
|
CROSSREFS
|
Cf. A000040, A178383, A178385, A178386
Sequence in context: A124338 A008356 A190421 * A068849 A196807 A083761
Adjacent sequences: A178384 A178385 A178386 * A178388 A178389 A178390
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Vladimir Joseph Stephan Orlovsky, May 26 2010
|
|
|
STATUS
|
approved
|
| |
|
|
