数据是这样的：

Disease <- rep(letters[1:16],sample(100:2000,16))
dt <- data.frame(
  Disease=Disease,
  CI=rnorm(length(Disease))
)



也就是说，对大于2组以上的数据进行Wilcoxon分析，计算出每组数据的Standardized score。

这个问题来源于下面这篇文章中的表3.

https://genomebiology.biomedcentral.com/articles/10.1186/gb-2004-5-7-r47#Tab3

请问，如何计算每组数据的Standardized score？谢谢！