login
Numbers k such that 2 is the smallest decimal digit of k^3.
6

%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