# Munzel and Brunner (2002) worked example: patient global impression (PGI) at
# baseline and after 4 weeks of physical exercise therapy for 15 patients.
res <- pairedRankTest(MunzelBrunner02.PGI$week4, MunzelBrunner02.PGI$baseline)
res$T_R # -186 (PGI values decreased)
res$Dplus # 29
res$p.value # 0.010 (two-sided exact p-value reported in the paper)
Run the code above in your browser using DataLab