|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
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
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|