|
|
A277594
|
|
Numbers k such that k/10^m == 7 mod 10, where 10^m is the greatest power of 10 that divides n.
|
|
9
|
|
|
7, 17, 27, 37, 47, 57, 67, 70, 77, 87, 97, 107, 117, 127, 137, 147, 157, 167, 170, 177, 187, 197, 207, 217, 227, 237, 247, 257, 267, 270, 277, 287, 297, 307, 317, 327, 337, 347, 357, 367, 370, 377, 387, 397, 407, 417, 427, 437, 447, 457, 467, 470, 477, 487
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Numbers having 7 as rightmost nonzero digit in base 10. This is one sequence in a 10-way splitting of the positive integers; the other nine are indicated in the Mathematica program.
|
|
LINKS
|
|
|
MATHEMATICA
|
z = 460; a[b_] := Table[Mod[n/b^IntegerExponent[n, b], b], {n, 1, z}]
p[b_, d_] := Flatten[Position[a[b], d]]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|