|
Search: id:A154797
|
|
|
| A154797 |
|
Odd partition numbers of even numbers. |
|
+0
5
|
|
| 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
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Odd numbers in A058696.
|
|
EXAMPLE
|
Contribution from Emeric Deutsch (deutsch(AT)duke.poly.edu), Aug 02 2009: (Start)
The odd number 5 is in the sequence as the partition number of the even number 4 (4,31,22,211,1111).
(End)
|
|
MAPLE
|
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); [From Alois P. Heinz (heinz(AT)hs-heilbronn.de), 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); [From Emeric Deutsch (deutsch(AT)duke.poly.edu), Aug 02 2009]
|
|
CROSSREFS
|
Cf. A000041, A005843, A058696, A154795, A154796, A154798.
Sequence in context: A050568 A065555 A067890 this_sequence A161852 A002359 A090518
Adjacent sequences: A154794 A154795 A154796 this_sequence A154798 A154799 A154800
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Omar E. Pol (info(AT)polprimos.com), Jan 26 2009
|
|
EXTENSIONS
|
More terms from Alois P. Heinz (heinz(AT)hs-heilbronn.de), Jul 28 2009
|
|
|
Search completed in 0.002 seconds
|
