login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A103150 Record values in A130971. 4
2, 3, 13, 23, 41, 47, 73, 97, 131, 163, 191, 193, 239, 277, 307, 353, 373, 379, 449, 487, 601, 631, 643, 709, 761, 811, 823, 881, 911, 1013, 1033, 1091, 1109, 1193, 1213, 1217, 1291, 1301, 1319, 1373, 1423, 1447, 1483, 1601, 1621, 1721, 1823, 1867, 1873, 1901, 4021, 5011, 266111, 4294978733 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Are the values A103150(53)=266111 and A103150(54)=4294978733 correct? -- Antti Karttunen, Jun 19 2007.

LINKS

Ray Chandler, Table of n, a(n) for n=1..59

FORMULA

a(n) = A130971(A130972(n)).

EXAMPLE

a(53) = 266111 = 2^18 - 3967, where 3967 = prime(549).

a(54) = 4294978733 = 2^32 - 11437, where 11437 = prime(1379).

a(55) = 37778931862957161731461 = 2^75 - 21893, where 21893 = prime(2456).

a(56) = 37778931862957161765331 = 2^75 - 55763, where 55763 = prime(5658).

a(57) = 2787593149816327892691964784081045188361473 = 2^141 - 113921, where 113921 = prime(10782).

a(58) = 2^835 - 983063, where 983063 = prime(77280). (252 digits)

a(59) = 2^1322 - 3993547, where 3993547 = prime(282738). (398 digits)

a(60) = 2^5945 - 42565109, where 42565109 = prime(2579884). (1790 digits)

a(61) = 2^16116 - 52274777, where 52274777 = prime(3129277). (4852 digits)

MATHEMATICA

pmin = 0; pm0 = 2^16384; mpm =0; ppm = 0; mcm = 0; pcm = 0; p = 1; While[pmin < pm0, pmin = pm0; = 0; nu2 = 1; cm = nu2 - p; cp = nu2 + p; While[(n < 16383) && (cm < pmin), If[(cp < pmin) && PrimeQ[cp], pmin = cp]; acm = Abs[cm]; If[(mpm < pmin) && PrimeQ[p], mpm = pmin; ppm = p; Save["pinc.txt", {mpm, ppm}]]; p = p + 2]

CROSSREFS

Cf. A103149, A102632.

Sequence in context: A181521 A133201 A215302 * A065723 A215134 A177746

Adjacent sequences:  A103147 A103148 A103149 * A103151 A103152 A103153

KEYWORD

nonn

AUTHOR

Lei Zhou, Feb 05 2005

EXTENSIONS

Edited, Scheme-code added and starting offset changed from 0 to 1 by Antti Karttunen, Jun 19 2007

Confirmed a(1)-a(54), extend to a(61) by Ray Chandler, Aug 06 2010

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 July 20 13:55 EDT 2019. Contains 325181 sequences. (Running on oeis4.)