login
Repunit semiprimes.
6

%I #9 Oct 02 2013 15:47:24

%S 111,1111,11111,1111111,11111111111,11111111111111111,

%T 11111111111111111111111111111111111111111111111,

%U 11111111111111111111111111111111111111111111111111111111111

%N Repunit semiprimes.

%F a(n) = A000042(A046413(n-1)). - _Ray Chandler_, Sep 06 2005

%e a(2)=1111 because 1111=11*101, so 1111 is semiprime as well as a repunit number.

%t Select[Table[FromDigits[PadRight[{},n,1]],{n,60}],PrimeOmega[#]==2&] (* _Harvey P. Dale_, Aug 28 2013 *)

%Y Cf. A046413 the repunit of length n has exactly 2 prime factors.

%K base,nonn

%O 1,1

%A _Shyam Sunder Gupta_, Feb 11 2005