cp's OEIS Frontend

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.

A382938 Nonnegative integers such that every odd digit except the leftmost is immediately preceded by a larger digit.

This page as a plain text file.
%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