# NOT RUN {
## Calculate tau-U for the example from Parker et al. (2011)
bob <- scdf(c(2, 3, 5, 3, 4, 5, 5, 7, 6), B.start = 5)
tauUSC(bob)
## Calculate tau-U with ties counted as positive
tauUSC(Grosche2011$Eva, ties.method = "positive")
## Request tau-U for all single-cases fom the Grosche2011 data
tauUSC(Grosche2011)
# }
Run the code above in your browser using DataLab