A278200 Partition numbers (A000041) of the form 2^6 * k for odd k.

2323520, 37027355200, 8030248384943040, 55733465144636286656, 134508188001572923840, 6179690078238084808000, 975509982873756796925504, 69523232218023552371152320, 638864582333908382360557376, 1151097146124113726578727360, 1204186073016375022219516992

Offset: 1

Author

Colin Barker, Nov 15 2016

Keywords

• nonn

Comments

Also partition numbers having six times as many even divisors as odd divisors.

Links

• Colin Barker, Table of n, a(n) for n = 1..150

Crossrefs

Cf. A275029, A278196, A278197, A278198, A278199, A278201.

Programs

Mathematica

Select[PartitionsP@ Range@ 1500, Count[#, k_ /; EvenQ@ k] == 6 Count[#, k_ /; OddQ@ k] &@ Divisors@ # &] (* Michael De Vlieger, Nov 15 2016 *)

PARI

maxk=1000; L=List(); for(k=1, maxk, p=numbpart(k); if(p%2^6==0 & p\2^6%2==1, listput(L, p))); Vec(L)