Following a suggestion here: http://groups.google.com/group/sage-devel/browse_frm/thread/7c9c5c57ef23b837
I copied below the data for the support newsgroup postings for Mathematica and Sage. The data starts in October 2006, since that's when the Sage support group started, and runs through November 2009.
sage="""93 40 54
2007 79 143 126 77 167 135 158 264 229 212 300 424
2008 416 475 543 611 434 362 554 680 622 651 682 639
2009 660 587 918 807 708 622 558 568 666 713 408 """
|
|
sage_counts=[ss.split('\t') for ss in sage.split('\n')]
for i in sage_counts[1:]:
del i[0] # Delete the year from every line except the first
|
|
sage_posts=[int(i) for i in flatten(sage_counts)[:-1]] # Convert to integers (leave out December 2009, though)
|
|
sage_post_plot=list_plot(sage_posts,plotjoined=True)
sage_post_plot
|
|
mathematica="""827 900 638
2007 627 766 895 740 1608 1321 1221 1162 840 1195 970 723
2008 687 755 1021 1190 943 916 845 647 868 800 740 971
2009 1048 976 1158 1168 1063 1000 882 715 769 839 635 """
|
|
mma_counts=[ss.split('\t') for ss in mathematica.split('\n')]
for i in mma_counts[1:]:
del i[0] # Delete the year from every line except the first
|
|
mma_posts=[int(i) for i in flatten(mma_counts)[:-1]] # Convert to integers (leave out December 2009, though)
|
|
mma_post_plot=list_plot(mma_posts,plotjoined=True,color='red')
mma_post_plot
|
|
diff_posts=[mma_posts[i]-sage_posts[i] for i in range(len(mma_posts))]
diff_post_plot=list_plot(diff_posts,plotjoined=True,color='green')
sage_post_plot+mma_post_plot+diff_post_plot #Sage is blue, MMA is red
|
|
|
|