Voozh

A090104

Decimal value of maximal digit of the n-th primorial when written in base n.

1, 1, 1, 3, 3, 5, 4, 5, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 18, 20, 21, 22, 23, 24, 25, 24, 27, 27, 29, 29, 31, 32, 33, 32, 35, 35, 35, 34, 39, 39, 41, 40, 43, 44, 44, 45, 45, 48, 49, 50, 51, 52, 53, 54, 53, 56, 57, 58, 59, 60, 61, 61, 62, 64, 64, 66, 67, 68, 69, 70, 69, 72

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

OFFSET

1,4

LINKS

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

EXAMPLE

n=11: 11th primorial is 200560490130 in base 10 while it is 7806X193790 written in base 11, so a[11]=10 (denoted by X).

MATHEMATICA

qp[x_] := Prime[x]*qp[x-1]; {qp[0]=1, qp[1]=2}; RecursionLimit$=10000; Table[Max[IntegerDigits[qp[j], j]], {j, 2, 100}]

CROSSREFS

Cf. A090102.

Sequence in context: A204004 A131950 A116192 * A388542 A333822 A075795