A255816 Number of primes in A065381 less than 10^n.

1, 1, 16, 130, 1246, 11577, 102613, 931944, 8573235, 78557819, 723625420, 6738938504

Offset: 1

Author

Arkadiusz Wesolowski, Mar 24 2015

Keywords

• nonn
• more

Crossrefs

Cf. A065381, A254248, A255971, A256164, A256238.

Programs

PARI

isA065381(p) = if(p == 2, 1, my(pow = 1); while(pow < p && !isprime(p - pow), pow *= 2); pow > p);
list(len) = {my(pow = 10, c = 0); forprime(p = 1, 10^len, if(p > pow, print1(c, ", "); pow *= 10); if(isA065381(p), c++));} \\ Amiram Eldar, Jul 19 2025

Extensions

a(10)-a(12) from Amiram Eldar, Jul 19 2025