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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A098330 Maximum entry in n-th row of A097859. 1
2, 2, 4, 6, 10, 14, 18, 16, 17, 25, 20, 28, 20, 28, 28, 27, 34, 38, 42, 42, 33, 27, 46, 56, 33, 43, 59, 112, 86, 60, 70, 46, 62, 76, 60, 55, 50, 39, 42, 66, 74, 92, 58, 52, 64, 54, 42, 50, 70, 73, 99, 142, 128, 84, 68, 59, 81, 88, 85, 101, 121, 53, 78, 72, 45, 62, 48, 78, 47, 90 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

COMMENTS

Odd numbers not present: 3,5,7,9,11,13,15,19,21,23,29,31,35,37,41,49,57,63,139,149,161,...,.

LINKS

Table of n, a(n) for n=0..69.

MATHEMATICA

PrimeFactors[n_] := Flatten[ Table[ #[[1]], {#[[2]]}] & /@ FactorInteger[n]]; a[m_, 0] = a[m_, m_] = 2; a[m_, n_] := a[m, n] = Plus @@ Join[ PrimeFactors[ a[m - 1, n - 1]], PrimeFactors[ a[m - 1, n]]]; Table[ Max[ Table[ a[m, n], {n, 0, m}]], {m, 0, 60}]

CROSSREFS

Cf. A097859.

Sequence in context: A323587 A236634 A034406 * A240310 A083848 A330644

Adjacent sequences:  A098327 A098328 A098329 * A098331 A098332 A098333

KEYWORD

nonn

AUTHOR

Leroy Quet and Robert G. Wilson v, Sep 03 2004

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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 23 01:49 EDT 2020. Contains 337962 sequences. (Running on oeis4.)