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 A093672 #31 Jun 14 2025 17:16:01 %S A093672 2,23,233,2333,23333,23333333333,23333333333333333, %T A093672 23333333333333333333333, %U A093672 233333333333333333333333333333333333333333333333333333,23333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333 %N A093672 Primes of the form (7*10^k - 1)/3. %C A093672 Primes of the form 2*10^k + 3*R_k, where R_k is the repunit (A002275) of length k. %H A093672 Robert Israel, <a href="/A093672/b093672.txt">Table of n, a(n) for n = 1..17</a> %H A093672 Makoto Kamada, <a href="https://stdkmd.net/nrr/2/23333.htm#prime">Prime numbers of the form 233...33</a>. %H A093672 <a href="/index/Pri#Pri_rep">Index entries for primes involving repunits</a>. %F A093672 a(n) = (7*10^A056701(n) - 1)/3 = A198972(A056701(n)). - _Elmo R. Oliveira_, Jun 14 2025 %p A093672 select(isprime,[seq(7*10^k-1)/3,k=0..100)]): # _Robert Israel_, Aug 07 2014 %t A093672 Select[(7 * 10^Range[0, 19] - 1)/3, PrimeQ] (* _Alonso del Arte_, Aug 07 2014 *) %t A093672 Select[Table[FromDigits[PadRight[{2},n,3]],{n,100}],PrimeQ] (* _Harvey P. Dale_, Oct 04 2015 *) %Y A093672 Cf. A002275, A056701 (corresponding values of k), A198972. %K A093672 nonn %O A093672 1,1 %A A093672 _Rick L. Shepherd_, Apr 08 2004 %E A093672 Simpler definition from _Alonso del Arte_, Aug 07 2014 %E A093672 One more term (a(10)) from _Harvey P. Dale_, Oct 04 2015