The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A126655 Numbers n such that 6*p(n)-1 and 6*p(n)+1 are twin primes and 6*p(n+1)-1 and 6*p(n+1)+1 are also twin primes with p(n) = n-th prime. 1
1, 2, 3, 27, 137, 340, 479, 882, 1415, 1883, 3442, 3798, 4284, 5827, 7559, 8783, 9453, 10355, 10731, 11388, 12565, 13613, 16477, 17007, 18402, 18665, 19450, 19633, 22306, 24971, 25083, 29108, 29861, 30748, 31694, 32622, 33097, 36743, 37141 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
EXAMPLE
6*2-1=11 6*2+1=13 11 13 twin primes as 17 and 19 so 1 is first term of the sequence
6*3-1=17 6*3+1=19 17 19 twin primes as 29 and 31 so 2 is second term of the sequence
6*5-1=29 6*5+1=31 29 and 31 twin primes 5=3rd prime
6*7-1=41 6*7+1=43 41 and 43 twin primes 7=4th prime so 3 is the 3rd term of the sequence
MATHEMATICA
Select[Range[39000], PrimeQ[6*Prime[ # ] - 1] && PrimeQ[6*Prime[ # ] + 1] && PrimeQ[6*Prime[ # + 1] - 1] && PrimeQ[6*Prime[ # + 1] + 1] &] (* Ray Chandler, Feb 11 2007 *)
Select[Range[40000], AllTrue[Flatten[{6*Prime[#]+{1, -1}, 6*Prime[#+1]+{1, -1}}], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Nov 27 2015 *)
CROSSREFS
Cf. A060212.
Sequence in context: A143876 A184506 A126203 * A242520 A132533 A059089
KEYWORD
nonn
AUTHOR
Pierre CAMI, Feb 09 2007
EXTENSIONS
Corrected and extended by Ray Chandler, Feb 11 2007
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 17 19:53 EDT 2024. Contains 372607 sequences. (Running on oeis4.)