|
Search: id:A118741
|
|
| |
|
| 67, 83, 167, 193, 251, 277, 433, 487, 503, 587, 601, 613, 727, 823, 907, 1063, 1217, 1231, 1553, 1663, 1777, 1861, 1873, 1973, 1987, 2083, 2281, 2293, 2351, 2377, 2393, 2797, 2897, 3217, 3343, 3541, 3847, 4073, 4283, 4451, 4507, 4591, 4813, 4871, 5081
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The gap as defined in A001223 of this prime numbers is 4 or 6.
The prime numbers in this sequence are of the form (14i-1) (if gap=6) or (14i-3) (if gap=4) with i=(level(n)+1)/2, level(n) defined in A117563.
|
|
LINKS
|
Remi Eismann, Table of n, a(n) for n=1..10000
|
|
FORMULA
|
A117078 : a(n) = smallest k such that prime(n+1) = prime(n) + (prime(n) mod k), or 0 if no such k exists. prime(n) for which k=7.
|
|
MATHEMATICA
|
f[n_] := Block[{a, p = Prime[n], np = Prime[n + 1]}, a = Min[Select[Divisors[2*p - np], #1 > np - p & ]]; If[a == Infinity, 0, a]]; Prime@ Select[ Range@695, f@# == 7 &] - Robert G. Wilson v (rgwv(at)rgwv.com), May 26 2006
|
|
CROSSREFS
|
Cf. A117078, A117563, A118922, A118924.
Adjacent sequences: A118738 A118739 A118740 this_sequence A118742 A118743 A118744
Sequence in context: A091490 A091075 A139973 this_sequence A130058 A119893 A130059
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Remi EISMANN (reismann(AT)free.fr), May 22 2006; May 27 2006; May 04 2007
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(at)rgwv.com), May 26 2006
|
|
|
Search completed in 0.003 seconds
|
