%I #21 Jan 17 2019 13:44:07
%S 0,2,4,41,53,64,197,238,784,3914,4436,12538,19036
%N Numbers n such that 9*10^n + 7*R_n - 6 is prime, where R_n = 11...1 is the repunit (A002275) of length n.
%C Also numbers n such that (88*10^n-61)/9 is prime.
%C a(14) > 10^5. - _Robert Price_, Nov 10 2015
%H Makoto Kamada, <a href="https://stdkmd.net/nrr/9/97771.htm#prime">Prime numbers of the form 977...771</a>.
%H <a href="/index/Pri#Pri_rep">Index entries for primes involving repunits</a>.
%F a(n) = A101014(n-1) + 1, for n>1.
%e For n=0, (88*10^n-61)/9 = 3 which is prime.
%t Do[ If[ PrimeQ[(88*10^n - 61)/9], Print[n]], {n, 0, 10000}]
%o (PARI) for(n=0, 1e3, if(ispseudoprime((88*10^n-61)/9), print1(n,", "))) \\ _Altug Alkan_, Nov 11 2015
%Y Cf. A002275, A101014.
%K more,nonn
%O 1,2
%A _Robert G. Wilson v_, Jan 19 2005
%E a(12)-a(13) from Kamada data by _Robert Price_, Dec 14 2010
%E Inserted a(1)=0 by _Robert Price_, Nov 10 2015
|