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 A278936 #15 Sep 08 2022 08:46:18 %S A278936 1331,1030301,1331000,1003003001,1030301000,1331000000,1000300030001, %T A278936 1003003001000,1030301000000,1331000000000,1000030000300001, %U A278936 1000300030001000,1003003001000000,1030301000000000,1331000000000000,321302302131323213,1000003000003000001 %N A278936 Cubes whose largest decimal digit is 3. %F A278936 a(n) = A278937(n)^3. %e A278936 321302302131323213 is in the sequence because 321302302131323213 = 684917^3 and its largest digit is 3. %t A278936 Select[Range[1000010]^3,Max[IntegerDigits[#]]==3&] (* _Harvey P. Dale_, Feb 09 2019 *) %o A278936 (PARI) select(n->vecmax(digits(n))==3, vector(1000000, n, n^3)) %o A278936 (Magma) [n^3: n in [1..2*10^7] | Max(Intseq(n^3)) eq 3]; // _Bruno Berselli_, Dec 02 2016 %Y A278936 Cf. A000578, A277947 (same for squares), A278937 (the cube roots). %K A278936 nonn,base %O A278936 1,1 %A A278936 _Colin Barker_, Dec 02 2016