This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A029947 #17 Nov 19 2024 16:07:11
%S A029947 27,343,125,27,91125,1331,1728,2197,103823,729,1331,3375,531441,343,
%T A029947 250047,50653,6859,9261,12167,571787,97336,29791,5832,24389,2197,
%U A029947 1191016,103823,10793861,1092727,11390625,13481272,13144256
%N A029947 Smallest cube containing n-th prime as substring.
%H A029947 John Cerkan, <a href="/A029947/b029947.txt">Table of n, a(n) for n = 1..10000</a>
%F A029947 a(n) = A029946(n)^3. - _Michel Marcus_, May 04 2017
%t A029947 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 *)
%t A029947 Module[{nn=300,cbs},cbs=Range[nn]^3;Table[SelectFirst[cbs,SequenceCount[IntegerDigits[#],IntegerDigits[p]]>0&],{p,Prime[Range[40]]}]] (* _Harvey P. Dale_, Nov 19 2024 *)
%Y A029947 Cf. A029945, A029946.
%K A029947 nonn,base
%O A029947 1,1
%A A029947 _Patrick De Geest_