[go: up one dir, main page]

login
A023763
Nialpdromes: digits in base 7 are in nonincreasing order.
2
0, 1, 2, 3, 4, 5, 6, 7, 8, 14, 15, 16, 21, 22, 23, 24, 28, 29, 30, 31, 32, 35, 36, 37, 38, 39, 40, 42, 43, 44, 45, 46, 47, 48, 49, 56, 57, 98, 105, 106, 112, 113, 114, 147, 154, 155, 161, 162, 163, 168, 169, 170, 171, 196, 203, 204, 210, 211, 212, 217, 218
OFFSET
1,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1001 (adapted to the new offset from Bruno Berselli)
MATHEMATICA
Select[Range[0, 2000], Max[Differences[IntegerDigits[#, 7]]]<=0&] (* Vincenzo Librandi, Dec 26 2012 *)
Select[Range[0, 218], GreaterEqual@@IntegerDigits[#, 7]&] (* Ray Chandler, Jan 06 2014 *)
CROSSREFS
Sequence in context: A222260 A032991 A032870 * A032904 A208530 A088416
KEYWORD
nonn,base,easy
STATUS
approved