%I #12 Sep 08 2022 08:46:19
%S 6,66,67,68,69,76,86,96,666,667,668,669,676,677,678,679,686,687,688,
%T 689,696,697,698,699,766,767,768,769,776,786,796,866,867,868,869,876,
%U 886,896,966,967,968,969,976,986,996,6666,6667,6668,6669,6676,6677,6678
%N Numbers whose smallest decimal digit is 6.
%C Numbers n such that A054054(n) = 6.
%C Prime terms are in A106106.
%t Select[Range[1000], Min[IntegerDigits[#]] == 6 &] (* _Giovanni Resta_, Mar 23 2017 *)
%o (Magma) [n: n in [1..100000] | Minimum(Setseq(Set(Sort(&cat[Intseq(n)])))) eq 6]
%o (PARI) isok(n) = vecmin(digits(n)) == 6; \\ _Michel Marcus_, Mar 25 2017
%Y Cf. Sequences of numbers whose smallest decimal digit is k (for k = 0..9): A011540 (k = 0), A284062 (k = 1), A284063 (k = 2), A284064 (k = 3), A284065 (k = 4), A284066 (k = 5), this sequence (k = 6), A284068 (k = 7), A284069 (k = 8), A002283 (k = 9).
%K nonn,base
%O 1,1
%A _Jaroslav Krizek_, Mar 23 2017