Skip to main content
12 events
when toggle format what by license comment
Mar 17, 2016 at 17:00 comment added Kristal Cantwell It was useful especially the link to A039924.
Mar 17, 2016 at 6:32 comment added მამუკა ჯიბლაძე @KristalCantwell Thanks for accepting but this does not really answer any of your questions :D So I will leave it cw I think...
Mar 16, 2016 at 19:59 vote accept Kristal Cantwell
Mar 15, 2016 at 21:58 comment added მამუკა ჯიბლაძე I used quick and dirty Mathematica code ListPlot[Table[With[{l = Select[IntegerPartitions[n], Max[Differences[#]] < -1 &]}, 2Length[Select[l, EvenQ@*Length]] - Length[l]], {n, 50}], Joined -> True], surely it can be done much better
Mar 15, 2016 at 21:52 history edited მამუკა ჯიბლაძე CC BY-SA 3.0
added 223 characters in body
Mar 15, 2016 at 21:37 history edited მამუკა ჯიბლაძე CC BY-SA 3.0
deleted 44 characters in body
Mar 15, 2016 at 21:17 history edited მამუკა ჯიბლაძე CC BY-SA 3.0
edited body
Mar 15, 2016 at 20:06 history edited მამუკა ჯიბლაძე CC BY-SA 3.0
added 295 characters in body
Mar 15, 2016 at 19:28 history edited მამუკა ჯიბლაძე CC BY-SA 3.0
correction
Mar 15, 2016 at 19:07 comment added Kristal Cantwell I assume this is a graph of the difference in question. How was it computed? Could it be extended further or are there computational obstacles preventing this after 50. It raises some more questions: Does this graph ever stabilize at one sign? Is its increase or decrease as n goes to n+1 limited by some integer? What is that integer if it exists? Can you show the absolute value exceeds any integer?
S Mar 15, 2016 at 18:58 history answered მამუკა ჯიბლაძე CC BY-SA 3.0
S Mar 15, 2016 at 18:58 history made wiki Post Made Community Wiki by მამუკა ჯიბლაძე