The OEIS is supported by the many generous donors to the OEIS Foundation.

 Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 60th year, we have over 367,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”). Other ways to Give
 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A336064 Numbers divisible by the maximal exponent in their prime factorization (A051903). 3
 2, 3, 4, 5, 6, 7, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 26, 27, 28, 29, 30, 31, 33, 34, 35, 36, 37, 38, 39, 41, 42, 43, 44, 46, 47, 48, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 61, 62, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 76, 77, 78, 79 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS The asymptotic density of this sequence is A336065 = 0.848957... (Schinzel and Šalát, 1994). REFERENCES József Sándor and Borislav Crstici, Handbook of Number theory II, Kluwer Academic Publishers, 2004, chapter 3, p. 331. LINKS Amiram Eldar, Table of n, a(n) for n = 1..10000 Andrzej Schinzel and Tibor Šalát, Remarks on maximum and minimum exponents in factoring, Mathematica Slovaca, Vol. 44, No. 5 (1994), pp. 505-514. EXAMPLE 4 = 2^2 is a term since A051903(4) = 2 is a divisor of 4. MATHEMATICA H[1] = 0; H[n_] := Max[FactorInteger[n][[;; , 2]]]; Select[Range[2, 100], Divisible[#, H[#]] &] PROG (PARI) isok(m) = if (m>1, (m % vecmax(factor(m)[, 2])) == 0); \\ Michel Marcus, Jul 08 2020 CROSSREFS Cf. A051903, A124184, A336065. A005117 (except for 1) is subsequence. Similar sequences: A033950, A005349, A006446, A074946, A075592, A007694, A112249, A336063. Sequence in context: A031981 A279486 A336063 * A039269 A039207 A272576 Adjacent sequences: A336061 A336062 A336063 * A336065 A336066 A336067 KEYWORD nonn AUTHOR Amiram Eldar, Jul 07 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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 10 22:05 EST 2023. Contains 367717 sequences. (Running on oeis4.)