login
A029947
Smallest cube containing n-th prime as substring.
3
27, 343, 125, 27, 91125, 1331, 1728, 2197, 103823, 729, 1331, 3375, 531441, 343, 250047, 50653, 6859, 9261, 12167, 571787, 97336, 29791, 5832, 24389, 2197, 1191016, 103823, 10793861, 1092727, 11390625, 13481272, 13144256
OFFSET
1,1
FORMULA
a(n) = A029946(n)^3. - Michel Marcus, May 04 2017
MATHEMATICA
Table[Function[p, k = 1; While[Length@ SequencePosition[ IntegerDigits[Set[c, k^3]], p] == 0, k++]; c]@ IntegerDigits@ Prime@ n, {n, 32}] (* Michael De Vlieger, May 04 2017, Version 10.1 *)
CROSSREFS
Sequence in context: A076394 A133211 A178983 * A030673 A030683 A038840
KEYWORD
nonn,base
STATUS
approved