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 A036330 #11 Feb 21 2019 23:17:07 %S A036330 64,96,144,160,176,208,216,224,240,264,272,304,312,324,336,360,368, %T A036330 396,400,408,440,456,464,468,484,486,496,504,520,540,552,560,572,592, %U A036330 594,600,612,616,656,660,676,680,684,688,696,702,726,728,729,744,748,752 %N A036330 Composite numbers n such that juxtaposition of prime factors of n has length 6. %C A036330 The last term of this sequence is a(96411)=994009. %H A036330 Nathaniel Johnston, <a href="/A036330/b036330.txt">Table of n, a(n) for n = 1..10000</a> %p A036330 isA036330 := proc(n) local d: d:=ifactors(n)[2]: return `if`(not isprime(n) and add(length(d[j][1])*d[j][2], j=1..nops(d))=6, n, NULL): end: seq(isA036330(n),n=2..752); # _Nathaniel Johnston_, Jun 22 2011 %t A036330 pf6Q[n_]:=!PrimeQ[n]&&Total[Last[#]IntegerLength[First[#]]&/@FactorInteger[ n]]==6; Select[Range[800],pf6Q] (* _Harvey P. Dale_, Jun 19 2012 *) %Y A036330 Cf. A036326-A036334. %K A036330 nonn,base,fini,easy %O A036330 1,1 %A A036330 _Patrick De Geest_, Dec 15 1998