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 A176847 #12 Sep 23 2018 00:22:07 %S A176847 1,3,5,7,11,13,17,19,23,27,29,31,37,41,43,45,47,53,59,61,63,67,71,73, %T A176847 75,79,81,83,89,97,99,101,103,105,107,109,113,117,125,127,131,135,137, %U A176847 139,147,149,151,153,157,163,165,167,171,173,175,179,181,189,191,193,195 %N A176847 The odd non-semiprime numbers. %H A176847 G. C. Greubel, <a href="/A176847/b176847.txt">Table of n, a(n) for n = 1..10000</a> %t A176847 Select[Range[1000], ! PrimeOmega[#] == 2 && OddQ[#] &] (* _G. C. Greubel_, Sep 22 2018 *) %o A176847 (PARI) s=[]; for(n=1, 1000, if(n%2==1 && bigomega(n)!=2, s=concat(s, n))); s \\ _Colin Barker_, Jun 28 2014 %o A176847 (PARI) concat( vector( 200, n, if( n%2 && bigomega(n)!=2, [n], []))) /* _Michael Somos_, Jun 28 2014 */ %Y A176847 Cf. A100959. %K A176847 nonn %O A176847 1,2 %A A176847 _Juri-Stepan Gerasimov_, Apr 27 2010, May 01 2010 %E A176847 Corrected (115 removed) by _R. J. Mathar_, May 01 2010