A328322 - OEIS

A328322

Maximal digit value used when A328316(n) is written in primorial base; maximal prime exponent in A328316(1+n).

0, 1, 1, 1, 1, 2, 3, 4, 7, 49, 430, 74814

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

OFFSET

0,6

LINKS

FORMULA

a(n) = A051903(A328316(1+n)).

PROG

(PARI)

A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };

A328316(n) = if(!n, 0, A276086(A328316(n-1)));

A328114(n) = { my(s=0, p=2); while(n, s = max(s, (n%p)); n = n\p; p = nextprime(1+p)); (s); };

\\ Or alternatively as, more slowly:

A051903(n) = if((1==n), 0, vecmax(factor(n)[, 2]));

CROSSREFS

KEYWORD

nonn

AUTHOR

STATUS

approved