The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A060235 Smallest primes whose residue modulo its difference from the next prime is 2n-1. 0
 3, 7, 23, 199, 139, 467, 293, 1951, 1259, 2179, 3739, 3271, 12011, 45779, 18869, 14107, 62233, 27143, 34981, 44293, 102701, 25471, 91033, 117443, 107377, 445363, 181303, 153001, 399793, 195599, 273367, 531383, 537413, 633667, 302329, 576791 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS FORMULA Min_{p | p mod (nextprime(p) - p) = 2n-1}; a(n) is the least prime with A000040(n) mod A001223(n) = 2n-1. EXAMPLE The residue p mod d = 5 = 2*3 - 1 for primes {23, 57, 53, 83, ...} of which the first one is 23, so a(3)=23. MATHEMATICA Module[{nn=100000, pm}, pm={#[[1]], Mod[#[[1]], #[[2]]-#[[1]]]}&/@Partition[ Prime[Range[nn]], 2, 1]; Table[SelectFirst[pm, #[[2]]==2n-1&], {n, 40}]] [[All, 1]] (* Harvey P. Dale, Aug 07 2019 *) PROG (PARI) a(n) = {my(p = 2); forprime(q=3, , if (q % (q-p) == (2*n-1), return (p)); p = q; ); } \\ Michel Marcus, Jul 09 2018 CROSSREFS Cf. A000040, A001223. Sequence in context: A113824 A121883 A262264 * A090188 A001773 A067604 Adjacent sequences:  A060232 A060233 A060234 * A060236 A060237 A060238 KEYWORD nonn AUTHOR Labos Elemer, Mar 21 2001 EXTENSIONS Offset 1 by Michel Marcus, Jul 09 2018 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 10 11:15 EDT 2021. Contains 342845 sequences. (Running on oeis4.)