|
|
A278199
|
|
Partition numbers (A000041) of the form 2^5 * k for odd k.
|
|
7
|
|
|
4087968, 625846753120, 576672674947168, 1896564103591584, 21424521360255636320, 61382395164161775318496, 25744258930034131533263392, 54951205445179608281719072, 1317709210896221493178043552, 172557592110602218633091543840, 6647848746214407376439536432805536
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Also partition numbers having five times as many even divisors as odd divisors.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[PartitionsP@ Range@ 1200, Count[#, k_ /; EvenQ@ k] == 5 Count[#, k_ /; OddQ@ k] &@ Divisors@ # &] (* Michael De Vlieger, Nov 15 2016 *)
|
|
PROG
|
(PARI) maxk=1400; L=List(); for(k=1, maxk, p=numbpart(k); if(p%2^5==0 & p\2^5%2==1, listput(L, p))); Vec(L)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|