A110268 - OEIS

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

A110268

Consider the sequence A110566: lcm{1,2,...,n}/denominator of harmonic number H(n). a(n) is the factor that is changed going from A110566(n) to A110566(n+1).

1, 1, 1, 1, 3, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 5, 3, 1, 1, 3, 5, 1, 3, 1, 1, 1, 1, 1, 11, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 11, 1, 1, 1, 1, 7, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 1, 1, 11, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 25, 1, 1, 1, 1, 5

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,5

COMMENTS

a(n) is always an odd prime power, A061345.

LINKS

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

EXAMPLE

A110566(4) through A110566(10) are {1,1,3,3,3,1,1}, therefore the factors are 1,3,1,1,3,1.

MATHEMATICA

f[n_] := LCM @@ Range[n]/Denominator[HarmonicNumber[n]]; Table[ LCM[f[n], f[n + 1]]/GCD[f[n], f[n + 1]], {n, 104}]

PROG