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.

A382623 Positive integers that contain an even digit d immediately preceded by a digit <= d.

This page as a plain text file.
%I A382623 #9 Apr 08 2025 23:12:55
%S A382623 12,14,16,18,22,24,26,28,34,36,38,44,46,48,56,58,66,68,78,88,100,102,
%T A382623 104,106,108,112,114,116,118,120,121,122,123,124,125,126,127,128,129,
%U A382623 134,136,138,140,141,142,143,144,145,146,147,148,149,156,158,160,161,162,163
%N A382623 Positive integers that contain an even digit d immediately preceded by a digit <= d.
%C A382623 Conjecture: these are the numbers missing from A382621.
%H A382623 Paolo Xausa, <a href="/A382623/b382623.txt">Table of n, a(n) for n = 1..10000</a>
%t A382623 A382623Q[k_] := MemberQ[Partition[IntegerDigits[k], 2, 1], {i_, j_?EvenQ} /; i <= j];
%t A382623 Select[Range[200], A382623Q]
%o A382623 (Python)
%o A382623 def ok(n):
%o A382623     s = str(n)
%o A382623     return any(s[i+1] >= s[i] for i in range(len(s)-1) if s[i+1] in "02468")
%o A382623 print([k for k in range(1, 164) if ok(k)]) # _Michael S. Branicky_, Apr 03 2025
%Y A382623 Cf. A347298, A382464, A382621, A382624 (complement).
%K A382623 nonn,base,easy
%O A382623 1,1
%A A382623 _Paolo Xausa_, Apr 01 2025