|
|
A278198
|
|
Partition numbers (A000041) of the form 2^4 * k for odd k.
|
|
7
|
|
|
176, 384276336, 2291320912, 5964539504, 10015581680, 290726957916112, 6486674127079088, 60105349839666544, 134819180623301520, 2332821198543892336, 14023788883518847344, 126891542690981418000, 320103136152993290544, 5852110108921301661040
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Also partition numbers having four times as many even divisors as odd divisors.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[PartitionsP@ Range@ 518, Count[#, k_ /; EvenQ@ k] == 4 Count[#, k_ /; OddQ@ k] &@ Divisors@ # &] (* Michael De Vlieger, Nov 15 2016 *)
|
|
PROG
|
(PARI) maxk=600; L=List(); for(k=1, maxk, p=numbpart(k); if(p%2^4==0 & p\2^4%2==1, listput(L, p))); Vec(L)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|