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 A365589 #40 Oct 22 2023 22:58:51 %S A365589 12,13,15,17,20,21,24,26,28,29,30,31,34,36,38,39,42,43,45,47,50,51,54, %T A365589 56,58,59,62,63,65,67,70,71,74,76,78,79,82,83,85,87,92,93,95,97,102, %U A365589 103,105,107,112,113,115,117,120,121,122,123,124,125,126,127,128,129,130,131,132 %N A365589 Numbers that have at least one prime digit and at least one nonprime digit. %C A365589 The first 44 terms coincide with A085556 (Number of prime digits = number of nonprime digits). a(45) = 102; A085556(45) = 1022. %t A365589 Select[Range[132], ContainsAny[IntegerDigits[#], {2,3,5,7}] && ContainsAny[IntegerDigits[#], {0,1,4,6,8,9}]&] (* _James C. McMahon_, Oct 08 2023 *) %Y A365589 Cf. A085556, A118950, A365472 (complement). %K A365589 nonn,base %O A365589 1,1 %A A365589 _James C. McMahon_, Sep 10 2023