A278199 Partition numbers (A000041) of the form 2^5 * k for odd k.

4087968, 625846753120, 576672674947168, 1896564103591584, 21424521360255636320, 61382395164161775318496, 25744258930034131533263392, 54951205445179608281719072, 1317709210896221493178043552, 172557592110602218633091543840, 6647848746214407376439536432805536

Offset

1,1

Comments

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

Links

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

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

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

Sequence in context: A231614 A191346 A307846 * A107023 A107024 A250862

Adjacent sequences: A278196 A278197 A278198 * A278200 A278201 A278202

Keyword

nonn

Author

Colin Barker, Nov 15 2016

Status

approved