A177836 Terms of A095075 which are not in A177835.

2, 541, 557, 563, 569, 587, 601, 613, 617, 647, 653, 659, 661, 677, 709, 787, 809, 929, 2141, 2203, 2221, 2251, 2281, 2333, 2347, 2357, 2381, 2389, 2393, 2417, 2467, 2473, 2617, 2659, 2699, 2707, 2713, 2729, 2837, 2851, 2857, 2897, 2953, 3221, 3347, 3461

Offset: 1

Author

Vladimir Shevelev, May 14 2010

Keywords

• nonn
• base

Comments

Note that the consecutive terms A095075(2)=17 up to A095075(27)=523 are all in A177835.

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A095075, A177835, A000120, A014499, A061712, A177768.

Programs

Mathematica

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 *)

Formula

A095075 \ A177835.

Extensions

Keyword:base and more terms from R. J. Mathar, May 31 2010