This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A352966 #7 Apr 14 2022 15:03:04 %S A352966 11,43,103,131,137,239,521,547,683,911,1093,1171,1301,1543,1951,2081, %T A352966 2341,2731,2861,3121,3251,3511,3823,6151,9767,12301,13879,16963,17477, %U A352966 18451,20047,21589,23131,24967,26729,30841,32771,32801,33289,34439,36901,40093 %N A352966 Primes of the form A321513(k) + 1 for some k > 0. %C A352966 Contains the two known Wieferich primes (A001220), i.e., 1093 and 3511. %C A352966 Is A001220 a subsequence? %e A352966 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 A352966 (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 A352966 forprime(p=1, 1e5, if(is(p-1), print1(p, ", "))) %Y A352966 Cf. A001220, A321513. %K A352966 nonn,base %O A352966 1,1 %A A352966 _Felix Fröhlich_, Apr 12 2022