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!)
A143702 a(n) is the minimal values of A007947((2^n)*m*(2^n-m)). 5
2, 6, 14, 30, 30, 42, 30, 78, 182, 1110, 570, 1830, 6666, 2310, 2534, 5538, 9870, 20010, 141270, 14070, 480090, 155490, 334110, 1794858, 2463270, 2132130, 2349390 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

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

For numbers m see A143700.

LINKS

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

MATHEMATICA

aa = {1}; bb = {1}; rr = {2}; 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, 2*r]; AppendTo[a, {x, logmax}], {x, 2, 15}]; rr (* Artur Jasinski with assistance of M. F. Hasler *)

CROSSREFS

Cf. A007947, A085152, A085153, A147298-A147307, A147638-A147643.

Sequence in context: A192705 A123991 A112511 * A063452 A009299 A330766

Adjacent sequences:  A143699 A143700 A143701 * A143703 A143704 A143705

KEYWORD

nonn,more

AUTHOR

Artur Jasinski, Nov 10 2008

EXTENSIONS

Name changed and 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 12 01:36 EDT 2021. Contains 342912 sequences. (Running on oeis4.)