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!)
A143701 a(n) is the least odd number 2^n - m minimizing A007947(m*(2^n - m)). 1
1, 3, 7, 15, 27, 63, 125, 243, 343, 999, 1805, 3721, 8181, 16335, 32761, 65533, 112847, 190269, 519375, 1046875, 1953125, 4192479, 8385125, 16775019, 24398405, 66976875, 134216625 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

a(n) is the smallest odd number such that the product of distinct prime divisors of (2^n)*a(n)*(2^n-a(n)) is the smallest for the range a(n) <= 2^x - a(n) < 2^x.

The product of distinct prime divisors of m*(2^n-m) is also called the radical of that number: rad(m*(2^n-m)).

LINKS

Table of n, a(n) for n=1..27.

FORMULA

a(n) = 2^n - A143700(n).

MATHEMATICA

aa = {1}; bb = {1}; rr = {}; Do[logmax = 0; k = 2^x; w = Floor[(k - 1)/2]; Do[m = FactorInteger[n (k - n)]; rad = 1; Do[rad = rad m[[s]][[1]], {s, 1, Length[m]}]; log = Log[k]/Log[rad]; If[log > logmax, bmin = k - n; amax = n; logmax = log; r = rad], {n, 1, w, 2}]; Print[{x, amax}]; AppendTo[aa, amax]; AppendTo[bb, bmin]; AppendTo[rr, r]; AppendTo[a, {x, logmax}], {x, 2, 15}]; bb (* Artur Jasinski with assistance of M. F. Hasler *)

CROSSREFS

Cf. A007947, A085152, A085153.

Cf. A147298, A147299, A147300, A147302, A147303, A147305, A147306, A147307.

Cf. A147638, A147639, A147640, A147641, A147642, A147643.

Sequence in context: A146726 A146228 A139806 * A147638 A147394 A103021

Adjacent sequences:  A143698 A143699 A143700 * A143702 A143703 A143704

KEYWORD

nonn,more

AUTHOR

Artur Jasinski, Nov 10 2008

EXTENSIONS

a(1) added by Jinyuan Wang, Aug 11 2020

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 April 13 02:47 EDT 2021. Contains 342934 sequences. (Running on oeis4.)