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 A093170 #31 Jul 08 2021 06:24:01 %S A093170 7,67,666667,66666667,666666667,66666666667,66666666666666666667, %T A093170 66666666666666666666667,66666666666666666666666666666666666666667, %U A093170 666666666666666666666666666666666666666666666666666666666666667 %N A093170 Primes of the form 60*R_k + 7, where R_k is the repunit (A002275) of length k. %C A093170 Primes of the form (2*10^k + 1)/3. - _Vincenzo Librandi_, Nov 16 2010 %C A093170 Occur in the factorization of some of the numbers of the form 13...3 not in A093671, cf. second Kamada link. - _M. F. Hasler_, Sep 14 2014 %H A093170 Makoto Kamada, <a href="https://stdkmd.net/nrr/6/66667.htm#prime">Prime numbers of the form 66...667</a>. %H A093170 Makoto Kamada, <a href="https://stdkmd.net/nrr/1/13333.htm">Factorizations of 133...33</a>. %H A093170 <a href="/index/Pri#Pri_rep">Index entries for primes involving repunits</a> %F A093170 a(n) = (20*10^A056657(n)+1)/3 = (2*10^A096507(n)+1)/3. %p A093170 A093170:=n->`if`(isprime((2*10^n+1)/3),(2*10^n+1)/3,NULL): seq(A093170(n), n=1..70); # _Wesley Ivan Hurt_, Sep 14 2014 %t A093170 Select[Table[FromDigits[PadLeft[{7},n,6]],{n,70}],PrimeQ] (* _Harvey P. Dale_, Jan 26 2013 *) %Y A093170 Cf. A002275, A056657 (corresponding k), A093671, A096507. %K A093170 nonn %O A093170 1,1 %A A093170 _Rick L. Shepherd_, Mar 26 2004 %E A093170 Edited by _Ray Chandler_, Feb 23 2012