A023759 - OEIS

A023759

Nialpdromes: digits in base 3 are in nonincreasing order.

0, 1, 2, 3, 4, 6, 7, 8, 9, 12, 13, 18, 21, 22, 24, 25, 26, 27, 36, 39, 40, 54, 63, 66, 67, 72, 75, 76, 78, 79, 80, 81, 108, 117, 120, 121, 162, 189, 198, 201, 202, 216, 225, 228, 229, 234, 237, 238, 240, 241, 242, 243, 324, 351, 360, 363, 364, 486, 567, 594

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

OFFSET

1,3

LINKS

Vincenzo Librandi and Ray Chandler, Table of n, a(n) for n = 1..1000 (first 800 terms from Vincenzo Librandi)

MATHEMATICA

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

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

PROG

(PARI) is(n)=n=digits(n, 3); n==vecsort(n, , 4) \\ Charles R Greathouse IV, Mar 31 2014

CROSSREFS

Sequence in context: A023747 A366976 A031998 * A397258 A004742 A391740

Adjacent sequences: A023756 A023757 A023758 * A023760 A023761 A023762

KEYWORD

nonn,base,easy

AUTHOR

Olivier Gérard

STATUS

approved