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 A177836 #8 Jul 27 2023 11:02:45 %S A177836 2,541,557,563,569,587,601,613,617,647,653,659,661,677,709,787,809, %T A177836 929,2141,2203,2221,2251,2281,2333,2347,2357,2381,2389,2393,2417,2467, %U A177836 2473,2617,2659,2699,2707,2713,2729,2837,2851,2857,2897,2953,3221,3347,3461 %N A177836 Terms of A095075 which are not in A177835. %C A177836 Note that the consecutive terms A095075(2)=17 up to A095075(27)=523 are all in A177835. %H A177836 Amiram Eldar, <a href="/A177836/b177836.txt">Table of n, a(n) for n = 1..10000</a> %F A177836 A095075 \ A177835. %t A177836 With[{b = DigitCount[Prime[Range[600]], 2, 1]}, Join[{2}, Select[Prime[Position[ 2*b - 1 - FoldList[Max, b], _?(# > 0 &)] // Flatten], Differences[DigitCount[#, 2]][[1]] >= 0 &]]] (* _Amiram Eldar_, Jul 27 2023 *) %Y A177836 Cf. A095075, A177835, A000120, A014499, A061712, A177768. %K A177836 nonn,base %O A177836 1,1 %A A177836 _Vladimir Shevelev_, May 14 2010 %E A177836 Keyword:base and more terms from _R. J. Mathar_, May 31 2010