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

Offset

0,6

Links

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

Index entries for sequences related to primorial base

Formula

a(n) = A328114(A328316(n)).

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); };
A328322(n) = A328114(A328316(n));
\\ Or alternatively as, more slowly:
A051903(n) = if((1==n), 0, vecmax(factor(n)[, 2]));
A328322(n) = A051903(A328316(1+n));

Crossrefs

Cf. A051903, A276086, A328114, A328316, A328317, A328318, A328319, A328323.

Sequence in context: A070527 A158652 A127074 * A109617 A181881 A229597

Adjacent sequences: A328319 A328320 A328321 * A328323 A328324 A328325

Keyword

nonn

Author

Antti Karttunen, Oct 14 2019

Status

approved