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 A091374 #14 Feb 05 2016 12:12:44 %S A091374 1,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,10,10,11,11,12,12,13,13,14,14,14,14, %T A091374 15,15,16,16,17,17,18,18,19,19,20,20,21,21,22,22,22,22,23,23,24,24,25, %U A091374 25,26,26,27,27,28,28,29,29,30,30,30,30,31,31,32,32,33,33,34,34,35,35 %N A091374 Number of numbers <= n having fewer prime factors than the value of their smallest prime factor. %C A091374 a(n) = #{m: A001222(m) < A020639(m), m<=n}; %C A091374 A091372(n) + A091373(n) + a(n) = n. %o A091374 (PARI) isok(n) = {my(f=factor(n)); (#f~ == 0) || (bigomega(n) < f[1,1]);} %o A091374 a(n) = sum(k=1, n, isok(k)); \\ _Michel Marcus_, Feb 05 2016 %Y A091374 Cf. A091377, A091371. %K A091374 nonn %O A091374 1,2 %A A091374 _Reinhard Zumkeller_, Jan 04 2004