A036330 Composite numbers n such that juxtaposition of prime factors of n has length 6.

64, 96, 144, 160, 176, 208, 216, 224, 240, 264, 272, 304, 312, 324, 336, 360, 368, 396, 400, 408, 440, 456, 464, 468, 484, 486, 496, 504, 520, 540, 552, 560, 572, 592, 594, 600, 612, 616, 656, 660, 676, 680, 684, 688, 696, 702, 726, 728, 729, 744, 748, 752

Offset: 1

Author

Patrick De Geest, Dec 15 1998

Keywords

• nonn
• base
• fini
• easy

Comments

The last term of this sequence is a(96411)=994009.

Links

• Nathaniel Johnston, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A036326-A036334.

Programs

Maple

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

Mathematica

pf6Q[n_]:=!PrimeQ[n]&&Total[Last[#]IntegerLength[First[#]]&/@FactorInteger[ n]]==6; Select[Range[800],pf6Q]  (* Harvey P. Dale, Jun 19 2012 *)