OFFSET
1,1
COMMENTS
EXAMPLE
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.
PROG
(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
forprime(p=1, 1e5, if(is(p-1), print1(p, ", ")))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Felix Fröhlich, Apr 12 2022
STATUS
approved