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 A063989 #11 Sep 18 2015 14:00:39 %S A063989 4,6,8,9,10,12,14,15,18,20,21,22,25,26,27,28,30,32,33,34,35,38,39,42, %T A063989 44,45,46,48,49,50,51,52,55,57,58,62,63,65,66,68,69,70,72,74,75,76,77, %U A063989 78,80,82,85,86,87,91,92,93,94,95,98,99,102,105,106 %N A063989 Numbers with a prime number of prime divisors (counted with multiplicity). %H A063989 Harry J. Smith, <a href="/A063989/b063989.txt">Table of n, a(n) for n = 1..1000</a> %p A063989 with(numtheory); a := []: for i from 1 to 300 do if isprime(bigomega(i)) then a := [op(a),i]; fi; od: a; %t A063989 Select[Range[200],PrimeQ[PrimeOmega[#]]&] (* _Harvey P. Dale_, Jul 25 2015 *) %o A063989 (PARI) n=0; for (m=1, 10^9, if (isprime(bigomega(m)), write("b063989.txt", n++, " ", m); if (n==1000, break))) \\ _Harry J. Smith_, Sep 05 2009 %o A063989 (PARI) is(n)=isprime(bigomega(n)) \\ _Charles R Greathouse IV_, Sep 18 2015 %K A063989 nonn %O A063989 1,1 %A A063989 _N. J. A. Sloane_, Sep 18 2001