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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A096475 a(n) is the smallest "lesser twin" prime p, such that prime(2 + p) - prime(p) = 2n (cf. A096474). 1
3, 17, 11, 41, 71, 101, 29, 569, 881, 137, 1151, 521, 1289, 2027, 10331, 1229, 3461, 461, 2549, 2129, 6569, 6131, 14387, 34157, 5657, 4259, 44621, 17387, 25301, 11159, 56099, 34367, 64877, 23201, 80147, 73361, 21017, 46349, 162287, 94439, 469877, 122501, 35507 (list; graph; refs; listen; history; text; internal format)
OFFSET

3,1

LINKS

Table of n, a(n) for n=3..45.

FORMULA

a(n) = min{x; A096474(x) = 2n} for n = 3, 4, ...

MATHEMATICA

{ta = Table[0, {1300}], tb = Table[0, {1300}], tc = Table[0, {1300}], u = 1}; Do[s = Prime[n + 1] - Prime[n]; If[s == 2, ta[[u]] = Prime[Prime[n + 1]] - Prime[Prime[n]]; tb[[u]] = n; tc[[u]] = Prime[n]; u = u + 1], {n, 1, 10000}]; a[n_] := tc[[FirstPosition[ta, 2 n][[1]]]]; Table[a[n], {n, 3, 40}] (* Jean-Fran├žois Alcover, Jul 28 2017, using Mathematica code for A096464 *)

PROG

(PARI) a(n) = {forprime(p=3, , if (isprime(p+2) && (prime(2+p)-prime(p) == 2*n), return (p))); p=3; } \\ Michel Marcus, Jul 28 2017

CROSSREFS

Cf. A001359, A096474, A096476.

Sequence in context: A273249 A273303 A033467 * A088122 A273702 A273710

Adjacent sequences:  A096472 A096473 A096474 * A096476 A096477 A096478

KEYWORD

nonn

AUTHOR

Labos Elemer, Jun 23 2004

EXTENSIONS

Name edited by Michel Marcus, Jul 28 2017

a(41)-a(45) from Michel Marcus, Jul 28 2017

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 5 16:12 EST 2021. Contains 341825 sequences. (Running on oeis4.)