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!)
A137516 Let 2n = p + q where p and q are primes. Take the p and q that produce the smallest product, then set a(n) = p*q - 2n. 2
0, 3, 7, 11, 23, 19, 23, 47, 31, 35, 71, 43, 87, 131, 55, 59, 119, 179, 71, 143, 79, 83, 167, 91, 183, 275, 103, 207, 311, 115, 119, 239, 359, 131, 263, 139, 143, 287, 431, 155, 311, 163, 327, 491, 175, 351, 527, 1403, 191, 383, 199, 203, 407, 211, 215, 431, 223, 447, 671 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,2

COMMENTS

Trying to translate the Goldbach conjecture into multiplication.

LINKS

Isaac E. Lambert and Charles R Greathouse IV, Table of n, a(n) for n = 2..10000 (first 100 terms from Lambert)

EXAMPLE

For example, the 13th term of the sequence is 43 since 26 = 3 + 23 (and the product 69 is minimal) and 3*23 - 26 = 43.

MATHEMATICA

f[n_] := Block[{p = 2}, While[ !PrimeQ[ 2n - p], p = NextPrime@ p]; 2n(p - 1) - p^2]; Array[f, 59, 2] (* Robert G. Wilson v, Mar 25 2012 *)

PROG

(PARI) a(n)=n+=n; forprime(p=2, default(primelimit), if(isprime(n-p), return(p*n-p^2-n))) \\ Charles R Greathouse IV, Mar 26 2012

CROSSREFS

Sequence in context: A201645 A028831 A244572 * A247380 A187265 A187266

Adjacent sequences:  A137513 A137514 A137515 * A137517 A137518 A137519

KEYWORD

nonn,easy

AUTHOR

Isaac Lambert, Apr 23 2008

EXTENSIONS

Edited by N. J. A. Sloane, May 23 2008

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 May 6 19:52 EDT 2021. Contains 343586 sequences. (Running on oeis4.)