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

2436, 5604, 451276, 715220, 831820, 1300156, 7089500, 12132164, 15796476, 26543660, 190569292, 483502844, 761002156, 851376628, 1327710076, 2841940500, 3519222692, 9035836076, 54770336324, 1280011042268, 1820701100652, 3972999029388, 6085253859260

Offset: 1

Author

Colin Barker, Nov 15 2016

Keywords

• nonn

Comments

Also partition numbers having twice as many even divisors as odd divisors.

A subsequence of A225324.

Links

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

Crossrefs

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

Programs

Mathematica

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

PARI

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