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 A036329 #14 Oct 10 2019 00:18:55 %S A036329 32,48,72,80,88,104,108,112,120,132,136,152,156,162,168,180,184,198, %T A036329 200,204,220,228,232,234,242,243,248,252,260,270,276,280,286,296,297, %U A036329 300,306,308,328,330,338,340,342,344,348,351,363,364,372,374,376,378 %N A036329 Composite numbers n such that juxtaposition of prime factors of n has length 5. %C A036329 The last term of this sequence is a(10077) = 96709. %H A036329 Nathaniel Johnston, <a href="/A036329/b036329.txt">Table of n, a(n) for n = 1..10077</a> (full sequence) %p A036329 isA036329 := 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))=5, n, NULL): end: l:=[seq(isA036329(n),n=2..378)]; # _Nathaniel Johnston_, Jun 22 2011 %t A036329 jpf5Q[n_]:=Total[Flatten[Table[IntegerLength[#[[1]]],{#[[2]]}]&/@ FactorInteger[ n]]]==5; Select[Range[400],CompositeQ[#]&&jpf5Q[#]&] (* _Harvey P. Dale_, Jan 09 2015 *) %Y A036329 Cf. A036326-A036334. %K A036329 nonn,base,fini,full,easy %O A036329 1,1 %A A036329 _Patrick De Geest_, Dec 15 1998