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 A030099 #33 Jul 28 2021 04:16:14
%S A030099 1,11,15,33,39,71,91,173,175,179,211,259,335,3337,4631,5597,7353,
%T A030099 12415,21353,22893,25799,69491,110011,124975,199831,227353,237151,
%U A030099 462815,492415,708415,1100033,2393695,2620611,5088493,5828415,7204417,8320335,11164415,11689633
%N A030099 Numbers k such that k^3 has only odd digits.
%H A030099 Giovanni Resta, <a href="/A030099/b030099.txt">Table of n, a(n) for n = 1..563</a> (terms < 10^19, first 75 terms from Reinhard Zumkeller, terms 76..151 from Max Alekseyev)
%t A030099 fQ[n_] := Union@ OddQ@ IntegerDigits[n^3] == {True}; Select[2 Range[3*10^6] - 1, fQ] (* _Robert G. Wilson v_, Aug 13 2011 *)
%t A030099 Select[Range[12*10^6],AllTrue[IntegerDigits[#^3],OddQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Apr 14 2015 *)
%o A030099 (Haskell)
%o A030099 import Data.List (intersect)
%o A030099 a030099 n = a030099_list !! (n-1)
%o A030099 a030099_list = filter (null . (intersect "86420") . show . (^ 3)) [1,3..]
%o A030099 -- _Reinhard Zumkeller_, Aug 13 2011
%Y A030099 Cf. A000578, A030100, A034376, A052004.
%K A030099 nonn,base,nice
%O A030099 1,2
%A A030099 _Patrick De Geest_