http://www.mediawiki.org/wiki/Special:Code/MediaWiki/76202
Revision: 76202
Author: diederik
Date: 2010-11-06 17:44:28 +0000 (Sat, 06 Nov 2010)
Log Message:
-----------
Statistics module.
Added Paths:
-----------
trunk/tools/editor_trends/statistics/
trunk/tools/editor_trends/statistics/__init__.py
trunk/tools/editor_trends/statistics/dataset.py
trunk/tools/editor_trends/statistics/median.py
trunk/tools/editor_trends/statistics/stata/
trunk/tools/editor_trends/statistics/stata/wiki.do
Property changes on: trunk/tools/editor_trends/statistics/__init__.py
___________________________________________________________________
Added: svn:eol-style
+ native
Added: trunk/tools/editor_trends/statistics/dataset.py
===================================================================
--- trunk/tools/editor_trends/statistics/dataset.py
(rev 0)
+++ trunk/tools/editor_trends/statistics/dataset.py 2010-11-06 17:44:28 UTC
(rev 76202)
@@ -0,0 +1,13 @@
+
+
+def determine_editor_is_new_wikipedian(edits, definition):
+
+ if definition == 'traditional':
+ if len(edits) < 10:
+ return False
+ else:
+ return True
+ else:
+ raise NotImplementedError
+
+
\ No newline at end of file
Property changes on: trunk/tools/editor_trends/statistics/dataset.py
___________________________________________________________________
Added: svn:eol-style
+ native
Added: trunk/tools/editor_trends/statistics/median.py
===================================================================
--- trunk/tools/editor_trends/statistics/median.py
(rev 0)
+++ trunk/tools/editor_trends/statistics/median.py 2010-11-06 17:44:28 UTC
(rev 76202)
@@ -0,0 +1,130 @@
+from collections import deque
+from random import random
+from math import log
+
+class Infinity(object):
+ 'Sentinel object that always compares greater than another object'
+ def __cmp__(self, other):
+ return 1
+
+def running_median(n, iterable, len=len, min=min, int=int, log=log,
random=random):
+ 'Fast running median with O(lg n) updates where n is the window size'
+
+ maxlevels = int(log(n, 2)) + 1
+ bottom_to_top = list(range(maxlevels))
+ top_to_bottom = bottom_to_top[::-1]
+
+ VALUE, NEXT, WIDTH = 0, 1, 2 # Components of a node list
+ NIL = [Infinity(), [], []] # Singleton terminator node
+ head = ['HEAD', [NIL] * maxlevels, [1] * maxlevels]
+ staircase = [None] * maxlevels
+
+ queue = deque()
+ queue_append, queue_popleft = queue.append, queue.popleft
+ midpoint = n // 2
+ oldnode = None
+ for newelem in iterable:
+ # staircase: first node on each level where node[NEXT][level][VALUE] >
newelem
+ queue_append(newelem)
+ stair_width = [0] * maxlevels
+ node = head
+ for level in top_to_bottom:
+ while not newelem < node[NEXT][level][VALUE]:
+ stair_width[level] += node[WIDTH][level]
+ node = node[NEXT][level]
+ staircase[level] = node
+
+ # make a new node or reuse one that was previously removed
+ if oldnode is None:
+ d = min(maxlevels, 1 - int(log(random(), 2.0)))
+ newnode = [newelem, [None] * d, [None] * d]
+ else:
+ newnode = oldnode
+ newnode[VALUE] = newelem
+ d = len(newnode[NEXT])
+
+ # insert a link to the newnode at each level
+ steps = 0
+ for level in bottom_to_top[:d]:
+ prevnode = staircase[level]
+ newnode[NEXT][level] = prevnode[NEXT][level]
+ prevnode[NEXT][level] = newnode
+ newnode[WIDTH][level] = prevnode[WIDTH][level] - steps
+ prevnode[WIDTH][level] = steps
+ steps += stair_width[level]
+ for level in bottom_to_top:
+ prevnode = staircase[level]
+ prevnode[WIDTH][level] += 1
+
+ if len(queue) >= n:
+ # find and yield the midpoint value
+ i = midpoint + 1
+ node = head
+ for level in top_to_bottom:
+ while node[WIDTH][level] <= i:
+ i -= node[WIDTH][level]
+ node = node[NEXT][level]
+ yield node[VALUE]
+
+ # staircase: first node on each level where
node[NEXT][level][VALUE] >= oldelem
+ oldelem = queue_popleft()
+ node = head
+ for level in top_to_bottom:
+ while node[NEXT][level][VALUE] < oldelem:
+ node = node[NEXT][level]
+ staircase[level] = node
+ oldnode = staircase[0][NEXT][0] # node where oldnode[VALUE] is
oldelem
+
+ # remove links to the oldnode
+ d = len(oldnode[NEXT])
+ for level in bottom_to_top[:d]:
+ prevnode = staircase[level]
+ prevnode[WIDTH][level] += oldnode[WIDTH][level]
+ prevnode[NEXT][level] = oldnode[NEXT][level]
+ for level in bottom_to_top:
+ prevnode = staircase[level]
+ prevnode[WIDTH][level] -= 1
+
+
+if __name__ == '__main__':
+
+ ###########################################################################
+ # Demonstrate the running_median() generator
+ # Compare results to an alternative generator
+ # implemented by sorting a regular list.
+
+ from bisect import insort
+ from random import randrange
+ from itertools import islice
+ import datetime
+
+ def running_median_slow(n, iterable):
+ 'Slow running-median with O(n) updates where n is the window size'
+ it = iter(iterable)
+ queue = deque(islice(it, n))
+ sortedlist = sorted(queue)
+ midpoint = len(queue) // 2
+ yield sortedlist[midpoint]
+ for newelem in it:
+ oldelem = queue.popleft()
+ sortedlist.remove(oldelem)
+ queue.append(newelem)
+ insort(sortedlist, newelem)
+ yield sortedlist[midpoint]
+
+ M, N, window = 9000, 80000, 101
+
+ data = [randrange(M) for i in range(N)]
+ t1 = datetime.datetime.now()
+ result = list(running_median(window, data))
+ t2 = datetime.datetime.now()
+ expected = list(running_median_slow(window, data))
+ t3 = datetime.datetime.now()
+ assert result == expected
+ d1 = t2 - t1
+ d2 = t3 - t2
+ print result
+ print expected
+ print 'Fast median: %s; slow median: %s' % (d1, d2)
+ print 'Successful test of RunningMedian() with', N,
+ print 'items and a window of size', window, '\n'
Property changes on: trunk/tools/editor_trends/statistics/median.py
___________________________________________________________________
Added: svn:eol-style
+ native
Added: trunk/tools/editor_trends/statistics/stata/wiki.do
===================================================================
--- trunk/tools/editor_trends/statistics/stata/wiki.do
(rev 0)
+++ trunk/tools/editor_trends/statistics/stata/wiki.do 2010-11-06 17:44:28 UTC
(rev 76202)
@@ -0,0 +1,72 @@
+local first_ten "edits_1 edits_2 edits_3 edits_4 edits_5 edits_6 edits_7
edits_8 edits_9 edits_10 final_edit"
+
+foreach edit of local first_ten {
+ gen date2 = date(`edit', "YMDhms")
+ drop `edit'
+ rename date2 `edit'
+ format `edit' %td
+}
+
+generate year_left = year(final_edit)
+sort year_joined
+by year_joined: gen community_size_t = _N
+
+
+forvalues year = 1(1)10{
+ gen active200`year' = 0
+ replace active200`year' =1 if((edits_10+(`year'*365)<=final_edit))
+ egen community_size_200`year' = total(active200`year')
+}
+
+forvalues t = 1(1)10{
+ local t1 = `t'+1
+ gen retention200`t' = community_size_200`t1' / community_size_200`t'
+}
+
+
+
+
+
+
+
+generate time_to_new_wp = edits_10 - edits_1
+generate active_time_wp = final_edit - edits_10
+label time_to_new_wp "Number of days it took to become a new wikipedian"
+label active_time_wp "Number of days active once becoming a new wikipedian"
+
+
+
+compress
+
+graph hbar (mean) time_to_new_wp, over(year_joined, label(labsize(small)))
blabel(bar, size(tiny) format(%9.0f)) ytitle(Average number of days) ytitle(,
size(vsmall)) ylabel(, labsize(small)) title("The average number of days to
become" "a new wikipedian increases.") note("A new wikipedian is defined as
somebody who has made at least 10 edits." "The year in which the 10th edit was
made determines in which year an editor became a new wikipedian." "Sample is
based on 83.265 new wikipedians who contributed 18,327,260 edits.",
size(vsmall))
+histogram time_to_new_wp, percent ytitle(Percentage (%)) ytitle(, size(small))
xtitle(Number of days) xtitle(, size(small)) by(, title("Histograms of number
of days it took" " to become a new wikipedian by year") subtitle(The pace by
which contributors are becoming a new wikipedian is slowing down., size(small))
note("Sample is based on 83.265 new wikipedians who contributed 18,327,260
edits." "A new wikipedian is somebody who has contributed at least 10 edits.",
size(vsmall))) by(year_joined)
+graph box time_to_new_wp, over(year_joined) nooutsides
+glcurve edit_count, by( year_joined) split lorenz
+
+
+
+insheet using "C:\Users\diederik.vanliere\Desktop\dataset.csv"
+// 0 = False
+// 1 = True
+
+rename v1 id
+rename v2 date
+format date2 %td
+gen date2 = date(date, "MD20Y")
+sort id
+by id: generate n = _n
+by id: egen first_obs = min(date2)
+by id: egen last_obs = max(date2)
+by id: generate time_required = last_obs - first_obs
+by id: generate year= year(last_obs)
+
+gen made_ten_edits =0
+by id: egen temp = max(n)
+by id: replace made_ten_edits=1 if(temp==10)
+drop temp
+
+
+
+by year, sort: egen time_to_new_wikipedian = mean( time_required)
+
+compress
Property changes on: trunk/tools/editor_trends/statistics/stata/wiki.do
___________________________________________________________________
Added: svn:eol-style
+ native
_______________________________________________
MediaWiki-CVS mailing list
MediaWiki-CVS@lists.wikimedia.org
https://lists.wikimedia.org/mailman/listinfo/mediawiki-cvs
