Create getMedian.R