This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A117873 Primes for which the level as defined in A117563 is 3. 5
 11, 19, 37, 43, 97, 113, 127, 139, 163, 223, 307, 313, 317, 337, 389, 397, 401, 421, 457, 479, 547, 673, 691, 709, 757, 761, 853, 863, 883, 929, 937, 953, 1021, 1051, 1109, 1297, 1303, 1327, 1399, 1471, 1567, 1571, 1583, 1693, 1699, 1723, 1783, 1951, 2029 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Remi Eismann, Table of n, a(n) for n = 1..10000 EXAMPLE 13 = 11 + 11 mod 3 = 11 + 11 mod 9, level = 3 701 = 691 + 691 mod 227 = 691 + 691 mod 681, level = 3 6907 = 6899 + 6899 mod 2297 = 6899 + 6899 mod 6891, level = 3 MATHEMATICA f[n_] := Block[{d, j = 2, p = Prime@n}, d = Prime[n + 1] - p; While[j < p && Mod[p, j] != d, j++ ]; If[j == p, 0, j]]; g[n_] := Block[{d, k = p = Prime@n}, d = Prime[n + 1] - p; While[k > 0 && Mod[p, k] != d, k-- ]; If[k == 0, 0, k]]; h[n_] := Block[{a = f@n, b = g@n}, If[a == 0, 0, b/a]]; Prime@Select[ Range@327, h@# == 3 &] (* Robert G. Wilson v *) CROSSREFS Cf. A117563, A117078, A118534. Sequence in context: A248398 A052368 A226542 * A271779 A271840 A076853 Adjacent sequences:  A117870 A117871 A117872 * A117874 A117875 A117876 KEYWORD nonn AUTHOR Rémi Eismann, May 02 2006 EXTENSIONS More terms from Robert G. Wilson v, May 06 2006 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified November 18 01:20 EST 2018. Contains 317279 sequences. (Running on oeis4.)