utl.st> a <- 1:9 utl.st> b <- a + 1 utl.st> spearman(a, b) # 1 [1] 1 utl.st> spearman(a, rev(b)) # -1 [1] -1 utl.st> qqr(a) # <1 [1] 0.9940174 utl.st> rmsd(a,a) # 0 [1] 0 utl.st> rmsd(a,b) # 1 [1] 1 utl.st> cvrmsd(a,b) # 1/5 [1] 0.2