The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A072751 Greatest of the most frequent prime factors of squarefree numbers <= n; a(1)=1. 4
 1, 2, 3, 5, 3, 3, 2, 2, 2, 2, 2, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS a(n)=2 for n>14. LINKS MATHEMATICA max = 200; primeFactors = FactorInteger[#][[All, 1]]& /@ Select[Range[max], SquareFreeQ]; a[n_] := Sort[ Tally[ Take[ primeFactors, n] // Flatten], Which[#1[[2]] > #2[[2]], True, #1[[2]] == #2[[2]], #1[[1]] > #2[[1]], True, False]& ][[1, 1]]; Table[a[n], {n, 1, primeFactors // Length}] (* Jean-François Alcover, Oct 14 2013 *) CROSSREFS Cf. A005117, A072747, A072748, A072749, A072750. Sequence in context: A254862 A322235 A172984 * A251542 A131971 A321882 Adjacent sequences:  A072748 A072749 A072750 * A072752 A072753 A072754 KEYWORD nonn,nice AUTHOR Reinhard Zumkeller, Jul 08 2002 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.

Last modified February 18 00:28 EST 2020. Contains 332006 sequences. (Running on oeis4.)