R/greatsort.R

greatsort <-
function(vec){
	x <- vec * (-1)
	index <- order(x)
	return(list(sortedvector=rev(sort(vec)), index=index))
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.