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 A065589 #20 Sep 06 2023 06:58:05 %S A065589 2,61,661,6661,666607,666667,66666629,66666667,666666667,6666666661, %T A065589 66666666667,6666666666629,66666666666629,666666666666631, %U A065589 66666666666666047,66666666666666601,6666666666666666059,666666666666666661,66666666666666666601,66666666666666666667 %N A065589 Smallest prime beginning with exactly n 6's. %H A065589 David A. Corneth, <a href="/A065589/b065589.txt">Table of n, a(n) for n = 0..700</a> (first 201 terms from M. F. Hasler) %t A065589 Do[a = Table[6, {n}]; k = 0; While[b = FromDigits[ Join[a, IntegerDigits[k] ]]; First[ IntegerDigits[k]] == 6 || !PrimeQ[b], k++ ]; Print[b], {n, 1, 17} ] %o A065589 (PARI) a(n) = {if(n==0, return(2)); my(cs = 60*(10^n\9), pow10 = 10); for(i = 1, oo, np = cs; d = 0; while(d < pow10, np = nextprime(np + 1); d = np - cs; if(d < pow10 && digits(d)[1] != 6 || 10*d < pow10, return(np))); cs*=10; pow10*=10)} \\ _David A. Corneth_, Sep 06 2023 %Y A065589 Cf. A037065, A065584, A065585, A065586, A065587, A065588, (this sequence), A065590, A065591, A065592. %K A065589 nonn,base %O A065589 0,1 %A A065589 _Robert G. Wilson v_, Nov 28 2001 %E A065589 Corrected by _Don Reble_, Jan 17 2007 %E A065589 Offset corrected by _Sean A. Irvine_, Sep 06 2023