|
|
A284068
|
|
Numbers whose smallest decimal digit is 7.
|
|
7
|
|
|
7, 77, 78, 79, 87, 97, 777, 778, 779, 787, 788, 789, 797, 798, 799, 877, 878, 879, 887, 897, 977, 978, 979, 987, 997, 7777, 7778, 7779, 7787, 7788, 7789, 7797, 7798, 7799, 7877, 7878, 7879, 7887, 7888, 7889, 7897, 7898, 7899, 7977, 7978, 7979, 7987, 7988, 7989
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Numbers n such that A054054(n) = 7.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[8000], Min[IntegerDigits[#]] == 7 &] (* Giovanni Resta, Mar 23 2017 *)
|
|
PROG
|
(Magma) [n: n in [1..100000] | Minimum(Setseq(Set(Sort(&cat[Intseq(n)])))) eq 7]
(PARI) isok(n) = vecmin(digits(n)) == 7; \\ Michel Marcus, Mar 25 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|