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

Offset: 1

Author

Labos Elemer, Dec 17 2003

Keywords

• base
• nonn

Examples

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

Crossrefs

Cf. A090102.

Programs

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}]