login
A256164
Number of terms in A256163 less than 10^n.
4
0, 1, 1, 1, 3, 10, 161, 2342, 27216, 317155, 3505277, 38127106
OFFSET
0,5
PROG
(PARI) isA256163(m) = if(!(m % 2), 0, my(pow = 2); while(pow < m && !isprime(m - pow) && !isprime(m + pow) && !isprime(m*pow - 1) && !isprime(m*pow + 1), pow *= 2); pow > m);
list(len) = {my(pow = 10, c = 0); print1(0, ", "); for(k = 1, 10^len, if(isA256163(k), c++); if(k == pow-1, print1(c, ", "); pow *= 10)); } \\ Amiram Eldar, Jul 19 2025
CROSSREFS
KEYWORD
nonn,more
AUTHOR
EXTENSIONS
a(9)-a(11) from Amiram Eldar, Jul 19 2025
STATUS
approved