This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A138111 Prime numbers p1 such that p1*p2-mod[p2,p1] is a prime, where p2 is the next prime after p1. 4
 2, 3, 7, 19, 23, 43, 53, 79, 127, 211, 229, 233, 337, 397, 443, 463, 467, 499, 503, 601, 631, 661, 967, 991, 1009, 1129, 1153, 1213 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS EXAMPLE 2 prime, 3 next-prime, 2*3-Mod[3,2]=2*3-1=5 prime. 3 prime, 5 next-prime, 3*5-Mod[5,3]=3*5-2=13 prime. 7 prime, 11 next-prime, 7*11-Mod[11,7]=7*11-4=73 prime. MATHEMATICA a={}; Do[p1=Prime[n]; p2=Prime[n+1]; e=p1*p2-Mod[p2, p1]; If[PrimeQ[e], AppendTo[a, p1]], {n, 10^2*2}]; a CROSSREFS Sequence in context: A117763 A165571 A178954 * A218100 A078373 A038878 Adjacent sequences:  A138108 A138109 A138110 * A138112 A138113 A138114 KEYWORD nonn AUTHOR Vladimir Joseph Stephan Orlovsky, May 06 2008 STATUS approved

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

Content is available under The OEIS End-User License Agreement .