%I #6 Feb 23 2023 14:08:06
%S 3,9,14,18,29,32,35,38,62,65,66,72,78,132,133,142,144,154,155,166,177,
%T 178,188,196,198,203,282,286,288,295,296,298,305,307,322,323,328,337,
%U 357,359,362,364,375,377,382,404,412,425,444,453,463,607,609,616,632
%N Numbers k such that 2 is the smallest decimal digit of k^3.
%e 38 is in the sequence because 38^3 = 54872, the smallest decimal digit of which is 2.
%t Select[Range[700],Min[IntegerDigits[#^3]]==2&] (* _Harvey P. Dale_, Feb 23 2023 *)
%o (PARI) select(k->vecmin(digits(k^3))==2, vector(1000, k, k))
%Y Cf. A291639, A291640, A291642, A291643, A291644.
%K nonn,base
%O 1,1
%A _Colin Barker_, Aug 28 2017