data <- c(0.1132, 0.0142, 0.0324, 0.10075, 0.0883)
names(data) <- c('individual_1','individual_2','individual_3','individual_4','individual_5')
crplot(data, fontsize = 15, xcex = 10, ycex = 10, xlab = 'ID', ylab = 'ICR', main = 'Individuals consistency ratio')
Run the code above in your browser using DataLab