A036329 Composite numbers n such that juxtaposition of prime factors of n has length 5.

32, 48, 72, 80, 88, 104, 108, 112, 120, 132, 136, 152, 156, 162, 168, 180, 184, 198, 200, 204, 220, 228, 232, 234, 242, 243, 248, 252, 260, 270, 276, 280, 286, 296, 297, 300, 306, 308, 328, 330, 338, 340, 342, 344, 348, 351, 363, 364, 372, 374, 376, 378

Offset

1,1

Comments

The last term of this sequence is a(10077) = 96709.

Links

Nathaniel Johnston, Table of n, a(n) for n = 1..10077 (full sequence)

Maple

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

Mathematica

jpf5Q[n_]:=Total[Flatten[Table[IntegerLength[#[[1]]], {#[[2]]}]&/@ FactorInteger[ n]]]==5; Select[Range[400], CompositeQ[#]&&jpf5Q[#]&] (* Harvey P. Dale, Jan 09 2015 *)

Crossrefs

Cf. A036326-A036334.

Sequence in context: A114447 A090052 A163285 * A014614 A046371 A348824

Adjacent sequences: A036326 A036327 A036328 * A036330 A036331 A036332

Keyword

nonn,base,fini,full,easy

Author

Patrick De Geest, Dec 15 1998

Status

approved