A114599 -id:A114599

Search: a114599 -id:a114599

Displaying 1-1 of 1 result found.

page 1

A114600

Highest prime divisor of A114599(n) (or 1 if A114599(n) is 1).

+20
1

1, 1, 2, 3, 7, 11, 13, 3, 5, 2, 11, 23, 127, 487, 1237, 331, 127, 21019, 1811, 140983, 2239651, 10005473, 1867397300827, 45590891, 96526424938433069, 6424815538907849, 3320782322201303130883, 167483630406434494769

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

OFFSET

1,3

LINKS

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

FORMULA

a(n) = A006530(A114599(n)).

MATHEMATICA

f[n_] := If[n == 1, 1, FactorInteger[n][[ -1, 1 ]]]; g[l_] := Append[l, 1 + Times @@ f /@ Take[l, -2]]; f/@Nest[g, {1, 1}, 30] (* Ray Chandler, Dec 26 2005 *)

CROSSREFS

Cf. A006530, A114599.

KEYWORD

nonn

AUTHOR

Leroy Quet, Dec 13 2005

EXTENSIONS

Extended by Ray Chandler, Dec 26 2005

STATUS

approved

page 1

Search completed in 0.004 seconds