|
|
A032846
|
|
Numbers whose base-8 representation Sum_{i=0..m} d(i)*8^i has d(m) < d(m-1) > d(m-2) < ...
|
|
4
|
|
|
1, 2, 3, 4, 5, 6, 7, 10, 11, 12, 13, 14, 15, 19, 20, 21, 22, 23, 28, 29, 30, 31, 37, 38, 39, 46, 47, 55, 80, 81, 88, 89, 90, 96, 97, 98, 99, 104, 105, 106, 107, 108, 112, 113, 114, 115, 116, 117, 120, 121, 122, 123, 124, 125, 126, 152, 153
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[200], Sign[Differences[IntegerDigits[#, 8]]]==PadRight[ {}, IntegerLength[ #, 8]-1, {1, -1}]&] (* Harvey P. Dale, Nov 01 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|