least number with n divisors
vdmcc
w.meeussen.vdmcc at vandemoortele.be
Wed Jan 20 14:00:04 CET 1999
the shorter the description, the nicer the sequence, no ?
%I A000001
%S A000001
1,2,4,6,16,12,64,30,36,48,1024,60,4096,192,144,210,65536,180,262144,
%T A000001
240,576,3072,4194304,420,1296,12288,900,960,268435456,720,1073741824,
%U A000001 2310,9216,196608,5184,1260,68719476736,786432,36864,1680
%N A000001 Least number with n divisors
%R A000001
%O A000001 1,2
%K A000001 nonn
%A A000001 Wouter Meeussen (w.meeussen.vdmcc at vandemoortele.be)
%t A000001
(Times@@(Prime[Range[Length[#]]]^Reverse[#-1]))&@Flatten[FactorInteger[n]/.{
a_Integer,b_}:>Table[a,{b}]]
w.meeussen.vdmcc at vandemoortele.be
tel +32 (0) 51 33 21 11
fax +32 (0) 51 33 21 75
More information about the SeqFan
mailing list