%I #7 Apr 14 2022 15:03:04

%S 11,43,103,131,137,239,521,547,683,911,1093,1171,1301,1543,1951,2081,

%T 2341,2731,2861,3121,3251,3511,3823,6151,9767,12301,13879,16963,17477,

%U 18451,20047,21589,23131,24967,26729,30841,32771,32801,33289,34439,36901,40093

%N Primes of the form A321513(k) + 1 for some k > 0.

%C Contains the two known Wieferich primes (A001220), i.e., 1093 and 3511.

%C Is A001220 a subsequence?

%e 1543 is prime and 1542 is 120012 in base 4, which is 00120012 when leading zeros are added and thus periodic, so 1543 is a term of the sequence.

%o (PARI) is(n, b=4) = for (w=1, oo, my (d=digits(n, b^w)); if (#d<=1, return (0), #Set(d)==1, return (1))) \\ after _Rémy Sigrist_ in A321513

%o forprime(p=1, 1e5, if(is(p-1), print1(p, ", ")))

%Y Cf. A001220, A321513.

%K nonn,base

%O 1,1

%A _Felix Fröhlich_, Apr 12 2022