This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A382938 #18 Apr 30 2025 10:13:23 %S A382938 0,1,2,3,4,5,6,7,8,9,10,12,14,16,18,20,21,22,24,26,28,30,31,32,34,36, %T A382938 38,40,41,42,43,44,46,48,50,51,52,53,54,56,58,60,61,62,63,64,65,66,68, %U A382938 70,71,72,73,74,75,76,78,80,81,82,83,84,85,86,87,88,90,91,92,93,94,95 %N A382938 Nonnegative integers such that every odd digit except the leftmost is immediately preceded by a larger digit. %H A382938 Paolo Xausa, <a href="/A382938/b382938.txt">Table of n, a(n) for n = 1..10000</a> %t A382938 A382938Q[k_] := FreeQ[Partition[IntegerDigits[k], 2, 1], {i_, j_?OddQ} /; i <= j]; %t A382938 Select[Range[0, 100], A382938Q] %o A382938 (Python) %o A382938 def ok(n): %o A382938 s = str(n) %o A382938 return all(s[i+1] < s[i] for i in range(len(s)-1) if s[i+1] in "13579") %o A382938 print([k for k in range(96) if ok(k)]) # _Michael S. Branicky_, Apr 14 2025 %Y A382938 Cf. A382937 (complement). %Y A382938 Cf. A377912, A382465, A382624, A383062, A383246, A383248, A383250, A383501. %K A382938 nonn,base,easy %O A382938 1,3 %A A382938 _Paolo Xausa_, Apr 14 2025