%I #7 Jul 13 2013 12:04:13
%S 7,17,41,43,59,67,83,101,109,127,151,193,211,227,229,263,269,271,313,
%T 331,337,347,373,389,397,431,433,439,449,457,491,499,509,541,557,577,
%U 593,601,617,619,643,653,659,661,677,701,719,727,761,769,787,797,821
%N Primes in A007066.
%C Complement of A193213 with respect to A000040, primes;
%C intersection of A007066 and A000040.
%H Reinhard Zumkeller, <a href="/A193214/b193214.txt">Table of n, a(n) for n = 1..10000</a>
%o a193214 n = a193214_list !! (n-1)
%o a193214_list = filter ((== 1) . a010051) a007066_list
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Sep 18 2011
|