OFFSET
1,1
COMMENTS
PROG
(PARI) isc(p) = for (b=2, p, my(k=3); while ((x=(b^k+1)/(b+1)) <= p, if (x == p, return (1)); k = nextprime(k+1); ); );
isnotb(p) = for (b=2, p-1, my(d=digits(p, b), md=vecmin(d)); if ((#d > 2) && (md == 1) && (vecmax(d) == 1), return (0)); ); return (1);
isok(p) = isprime(p) && !isc(p) && isnotb(p); \\ Michel Marcus, May 01 2021
CROSSREFS
Primes of the form (b^k-1)/(b-1) = A085104 (Brazilian primes).
Primes of the form (c^q+1)/(c+1) = A059055.
Primes of the form (b^k-1)/(b-1) and also (c^q+1)/(c+1): A002383 \ {3} is a subsequence, but, maybe the intersection (conjecture).
Primes of the form (b^k-1)/(b-1) but not (c^q+1)/(c+1) = A225148.
Primes of the form (c^q+1)/(c+1) but not (b^k-1)/(b-1) = A343774.
Primes neither of the form (c^q+1)/(c+1) nor (b^k-1)/(b-1) = this sequence.
KEYWORD
nonn,base
AUTHOR
Bernard Schott, Apr 29 2021
STATUS
approved