A163096 Odd numbers with an even number of partitions.
9, 11, 15, 19, 21, 25, 27, 31, 45, 47, 55, 57, 59, 65, 75, 79, 97, 101, 103, 109, 113, 117, 125, 129, 131, 133, 135, 137, 141, 147, 149, 151, 153, 163, 167, 171, 175, 179, 187, 191, 197, 205, 207, 213, 217, 227, 231, 241, 243, 245, 247, 253, 255, 265, 267, 271
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Range[1,500,2],EvenQ[PartitionsP[#]]&] (* Vincenzo Librandi, Mar 19 2012 *)
Extensions
More terms from Sean A. Irvine, Oct 26 2009