A023768 - OEIS

A023768

Nialpdromes: digits in base 13 are in nonincreasing order.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 26, 27, 28, 39, 40, 41, 42, 52, 53, 54, 55, 56, 65, 66, 67, 68, 69, 70, 78, 79, 80, 81, 82, 83, 84, 91, 92, 93, 94, 95, 96, 97, 98, 104, 105, 106, 107, 108, 109, 110, 111, 112, 117, 118, 119, 120, 121, 122, 123

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

MATHEMATICA

Select[Range[0, 1000], Max[Differences[IntegerDigits[#, 13]]]<=0&] (* Vincenzo Librandi, Dec 26 2012 *)

Select[Range[0, 123], GreaterEqual@@IntegerDigits[#, 13]&] (* Ray Chandler, Jan 06 2014 *)

CROSSREFS

Sequence in context: A072089 A072088 A376774 * A023795 A032949 A094275

Adjacent sequences: A023765 A023766 A023767 * A023769 A023770 A023771

KEYWORD

nonn,base,easy

AUTHOR

Olivier Gérard

STATUS

approved