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 A294999 #7 Jul 08 2018 17:24:24 %S A294999 9,13,16,17,19,21,27,28,29,31,33,34,39,41,43,45,46,48,49,57,58,59,61, %T A294999 66,69,71,73,76,79,84,89,90,97,98,99,103,106,108,109,112,113,116,119, %U A294999 124,125,128,129,130,131,132,139,143,144,148,149,151,156,157,158,159,160,164,165,166,169 %N A294999 Numbers n such that the largest digit of n^3 is 9. %C A294999 For any term a(n), all numbers of the form a(n)*10^k, k >= 0, are in this sequence. We could call "primitive" the terms not of this form, i.e., without trailing '0'. %e A294999 13 is in the sequence because the largest digit of 13^3 = 2197 is 9. %t A294999 Select[Range[200],Max[IntegerDigits[#^3]]==9&] (* _Harvey P. Dale_, Jul 08 2018 *) %o A294999 (PARI) for(n=1,200, vecmax(digits(n^3))==9&&print1(n",")) %Y A294999 Cf. A295024 (the corresponding cubes); A278937, A294664, A294665, A294996, A294997, A294998 (same for digit 3, ..., 8). %Y A294999 Cf. A000578 (the cubes). %K A294999 nonn,base %O A294999 1,1 %A A294999 _M. F. Hasler_, Nov 13 2017