A154795 -id:A154795 - cp's OEIS frontend

A154798 Even partition numbers of even numbers.

2, 22, 42, 1002, 2436, 3718, 5604, 12310, 37338, 53174, 105558, 204226, 715220, 1300156, 1741630, 2323520, 4087968, 7089500, 12132164, 15796476, 26543660, 34262962, 92669720, 118114304, 150198136, 190569292, 384276336, 483502844

Offset: 1

Omar E. Pol, Jan 26 2009

nonn

Even numbers in A058696.

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

Cf. A000041, A005843, A058696, A127219, A154795, A154796, A154797.

aa:= proc(n, i) if n=0 then 1 elif n<0 or i=0 then 0 else aa(n,i):= aa(n, i-1) +aa(n-i, i) fi end: a:= proc(n) local k; if n>1 then a(n-1) fi; for k from `if`(n=1, 0, b(n-1)+2) by 2 while irem(aa(k, k), 2)=1 do od; b(n):= k; aa(k, k) end: seq(a(n), n=1..40); # Alois P. Heinz, Jul 28 2009

Select[Table[PartitionsP[n], {n, 0, 200, 2}], EvenQ] (* Jean-François Alcover, Aug 28 2015 *)

select(x->!(x%2), vector(80, n, numbpart(2*n))) \\ Michel Marcus, Aug 28 2015

More terms from Alois P. Heinz, Jul 28 2009

A154796 Even partition numbers of odd numbers.

Original entry on oeis.org

30, 56, 176, 490, 792, 1958, 3010, 6842, 89134, 124754, 451276, 614154, 831820, 2012558, 8118264, 13848650, 133230930, 214481126, 271248950, 541946240, 851376628, 1327710076, 3163127352, 4835271870, 5964539504, 7346629512

Offset: 1

Omar E. Pol, Jan 26 2009

nonn

Even numbers in A058695.

			The even number 30 is in the sequence as the partition number of the odd number 9. - _Emeric Deutsch_, Aug 02 2009

Alois P. Heinz, Table of n, a(n) for n = 1..1000

Cf. A000041, A005408, A058695, A154795, A154797, A154798.

aa:= proc(n, i) if n=0 then 1 elif n<0 or i=0 then 0 else aa(n,i):= aa(n, i-1) +aa(n-i, i) fi end: a:= proc(n) local k; if n>1 then a(n-1) fi; for k from `if`(n=1, 1, b(n-1)+2) by 2 while irem(aa(k, k), 2)=1 do od; b(n):= k; aa(k, k) end: seq(a(n), n=1..40); # Alois P. Heinz, Jul 28 2009
with(combinat): a := proc (n) if `mod`(numbpart(2*n-1), 2) = 0 then numbpart(2*n-1) else end if end proc: seq(a(n), n = 1 .. 70); # Emeric Deutsch, Aug 02 2009

Reap[Do[If[EvenQ[p = PartitionsP[n]], Sow[p]], {n, 1, 199, 2}]][[2, 1]] (* Jean-François Alcover, Nov 11 2015 *)
Select[PartitionsP[Range[1,201,2]],EvenQ] (* Harvey P. Dale, Apr 03 2019 *)

lista(nn) = for (n=1, nn, if (((p = numbpart(2*n+1)) % 2) == 0, print1(p, ", "))); \\ Michel Marcus, Dec 19 2016

More terms from Alois P. Heinz, Jul 28 2009

A154797 Odd partition numbers of even numbers.

Original entry on oeis.org

1, 5, 11, 77, 135, 231, 385, 627, 1575, 8349, 17977, 26015, 75175, 147273, 281589, 386155, 526823, 966467, 3087735, 5392783, 9289091, 20506255, 44108109, 56634173, 72533807, 241265379, 304801365, 952050665, 1482074143, 6620830889

Offset: 1

Omar E. Pol, Jan 26 2009

nonn

Odd numbers in A058696.

			The odd number 5 is in the sequence as the partition number of the even number 4: (4, 3+1, 2+2, 2+1+1, 1+1+1+1). - _Emeric Deutsch_, Aug 02 2009

Alois P. Heinz, Table of n, a(n) for n = 1..1000

Cf. A000041, A005843, A058696, A154795, A154796, A154798.

aa:= proc(n, i) if n=0 then 1 elif n<0 or i=0 then 0 else aa(n,i):= aa(n, i-1) +aa(n-i, i) fi end: a:= proc(n) local k; if n>1 then a(n-1) fi; for k from `if`(n=1, 0, b(n-1)+2) by 2 while irem(aa(k, k), 2)=0 do od; b(n):= k; aa(k, k) end: seq(a(n), n=1..40); # Alois P. Heinz, Jul 28 2009
with(combinat): a := proc (n) if `mod`(numbpart(2*n), 2) = 1 then numbpart(2*n) else end if end proc: seq(a(n), n = 0 .. 70); # Emeric Deutsch, Aug 02 2009

Select[PartitionsP[2*Range[0,100]],OddQ] (* Harvey P. Dale, Nov 30 2014 *)

More terms from Alois P. Heinz, Jul 28 2009

A194798 Numbers n having the same parity as the number of partitions of n.

Original entry on oeis.org

1, 2, 3, 5, 7, 8, 10, 13, 17, 22, 23, 26, 28, 29, 30, 33, 34, 35, 37, 39, 40, 41, 42, 43, 46, 49, 50, 51, 53, 58, 61, 62, 63, 64, 66, 67, 69, 70, 71, 73, 74, 77, 78, 80, 81, 83, 84, 85, 86, 87, 89, 91, 93, 94, 95, 96, 98, 99, 100, 105, 106, 107, 108, 110, 111

Offset: 1

Omar E. Pol, Jan 29 2012

Odd positive integers with an odd number of partitions and even positive integers with an even number of partitions. - Omar E. Pol, Mar 17 2012

Union of A067567 and A127219. Note that the union of A163096 and A163097 gives A209920 and the union of A209920 and this sequence gives A001477. - Omar E. Pol, Mar 22 2012

			10 is in the sequence because the number of partitions of 10 is equal to 42 and both 10 and 42 have the same parity.

Alois P. Heinz, Table of n, a(n) for n = 1..1000
K. Ono, Parity of the partition function, Electronic Research Announcements of AMS, Vol. 1, 1995, pp. 35-42; MR 96d:11108

Cf. A000041, A040051, A052001, A052003, A067567, A127219, A154795-A154798, A163096, A163097, A163998, A194807, A209658, A209659, A209920.

with(combinat):
a:= proc(n) option remember; local k;
      for k from 1+`if`(n=1, 0, a(n-1))
      while irem(k+numbpart(k), 2)=1 do od; k
    end:
seq(a(n), n=1..80); # Alois P. Heinz, Mar 16 2012

Select[Range[200], Mod[PartitionsP[#] - #, 2] == 0 &] (* T. D. Noe, Mar 16 2012 *)

More terms from Alois P. Heinz, Mar 16 2012

A209920 Numbers n having distinct parity as the number of partitions of n.

Original entry on oeis.org

0, 4, 6, 9, 11, 12, 14, 15, 16, 18, 19, 20, 21, 24, 25, 27, 31, 32, 36, 38, 44, 45, 47, 48, 52, 54, 55, 56, 57, 59, 60, 65, 68, 72, 75, 76, 79, 82, 88, 90, 92, 97, 101, 102, 103, 104, 109, 113, 114, 117, 118, 125, 129, 131, 132, 133, 134, 135, 137, 138, 140

Offset: 1

Omar E. Pol, Mar 16 2012

nonn

Odd positive integers with an even number of partitions and nonnegative even integers with an odd number of partitions. Union of A163097 and A163096. Note that the union of A067567 and A127219 gives A194798 and the union of A194798 and this sequence gives A001477.

			4 is in the sequence because the number of partitions of 4 is equal to 5 and the parity of 4 is distinct to the parity of 5 because 4 is even and 5 is odd.
9 is in the sequence because the number of partitions of 9 is equal to 30 and the parity of 9 is distinct to the parity of 30 because 9 is odd and 30 is even.

K. Ono, Parity of the partition function, Electronic Research Announcements of AMS, Vol. 1, 1995, pp. 35-42; MR 96d:11108

Complement of A194798.

Cf. A000041, A040051, A052001, A052003, A067567, A127219, A154795-A154798, A163096, A163097, A163998, A194807, A209658, A209659.

A209658 Partition numbers p(n) having the same parity as n.

Original entry on oeis.org

1, 2, 3, 7, 15, 22, 42, 101, 297, 1002, 1255, 2436, 3718, 4565, 5604, 10143, 12310, 14883, 21637, 31185, 37338, 44583, 53174, 63261, 105558, 173525, 204226, 239943, 329931, 715220, 1121505, 1300156, 1505499, 1741630, 2323520, 2679689, 3554345

Offset: 1

Omar E. Pol, Mar 22 2012

nonn

Union of A154795 and A154798. The union of A209659 and this sequence gives A000041.

K. Ono, Parity of the partition function, Electronic Research Announcements of AMS, Vol. 1, 1995, pp. 35-42; MR 96d:11108

Cf. A000041, A052001, A052003, A067567, A127219, A154795-A154798, A163096, A163097, A194798, A209659, A209920.

A209659 Partition numbers p(n) having opposite parity of n.

Original entry on oeis.org

1, 5, 11, 30, 56, 77, 135, 176, 231, 385, 490, 627, 792, 1575, 1958, 3010, 6842, 8349, 17977, 26015, 75175, 89134, 124754, 147273, 281589, 386155, 451276, 526823, 614154, 831820, 966467, 2012558, 3087735, 5392783, 8118264, 9289091, 13848650

Offset: 1

Omar E. Pol, Mar 22 2012

nonn

Union of A154797 and A154796. The union of this sequence and A209658 gives A000041.

K. Ono, Parity of the partition function, Electronic Research Announcements of AMS, Vol. 1, 1995, pp. 35-42; MR 96d:11108

Cf. A000041, A052001, A052003, A067567, A127219, A154795-A154798, A163096, A163097, A194798, A209658, A209920.

A193831 Odd partition numbers of prime numbers.

Original entry on oeis.org

3, 7, 15, 101, 297, 1255, 4565, 21637, 44583, 63261, 329931, 1121505, 2679689, 4697205, 6185689, 23338469, 49995925, 431149389, 3913864295, 13610949895, 80630964769, 362326859895, 749474411781, 2168627105469, 3646072432125, 10085065885767, 27152408925615

Offset: 1

Omar E. Pol, Aug 06 2011

nonn

			The odd number 101 is in the sequence as the partition number of the prime number 13.

Odd numbers in A058698.

Cf. A000040, A000041, A052003, A154795, A163998, A193830.

cp's OEIS Frontend

A154798 Even partition numbers of even numbers.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Extensions

A154796 Even partition numbers of odd numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Extensions

A154797 Odd partition numbers of even numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Extensions

A194798 Numbers n having the same parity as the number of partitions of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Extensions

A209920 Numbers n having distinct parity as the number of partitions of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

A209658 Partition numbers p(n) having the same parity as n.

Views

Author

Keywords

Comments

Links

Crossrefs

A209659 Partition numbers p(n) having opposite parity of n.

Views

Author

Keywords

Comments

Links

Crossrefs

A193831 Odd partition numbers of prime numbers.

Views

Author

Keywords

Examples

Crossrefs