|
%I #9 Sep 08 2022 08:45:53
%S 41,461,46666661,4666666661,466666666666661,4666666666666666666666661,
%T 4666666666666666666666666666666666666666666661,
%U 46666666666666666666666666666666666666666666666661,46666666666666666666666666666666666666666666666666666666666666666666666661
%N Primes of the form (14*10^n-17)/3
%t Select[Table[FromDigits[Join[PadRight[{4},n,6],{1}]],{n,80}],PrimeQ] (* _Harvey P. Dale_, Nov 21 2014 *)
%o (Magma) [a: n in [0..250]|IsPrime(a) where a is (14*10^n-17)div(3)]
%Y Cf. A102994
%K nonn
%O 1,1
%A _Vincenzo Librandi_, Dec 11 2010
|
