A176166 Highest exponents of triangular numbers.

1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 1, 3, 3, 2, 2, 1, 1, 1, 1, 2, 2, 2, 3, 3, 1, 1, 1, 4, 4, 1, 1, 2, 2, 1, 1, 2, 2, 1, 1, 1, 2, 2, 1, 3, 3, 2, 2, 1, 1, 3, 3, 2, 2, 1, 1, 1, 1, 1, 2, 5, 5, 1, 1, 1, 1, 1, 1, 2, 2, 1, 2, 2, 1, 1, 1, 3, 4, 4, 1, 1, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1, 4, 4, 2, 2, 2, 2, 1, 1, 2, 2, 1, 1

Offset

1,6

Comments

FactorInteger[6]={{2, 1}, {3, 1}},..FactorInteger[28]={{2, 2}, {7, 1}},...

Links

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

Mathematica

f1[n_]:=Max[Last/@FactorInteger[n]]; f2[n_]:=n*(n+1)/2; Table[f1[f2[n]], {n, 2, 4*5!}]
Max[FactorInteger[#][[;; , 2]]]&/@Accumulate[Range[110]] (* Harvey P. Dale, Oct 23 2024 *)

Crossrefs

Cf. A000217, A005361, A135939

Sequence in context: A126061 A088496 A036602 * A167911 A037804 A316894

Adjacent sequences: A176163 A176164 A176165 * A176167 A176168 A176169

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Apr 10 2010

Status

approved