powered by
set.rank <==> .data$Rank = rank(.data[, .col], ties.method = 'average')==>
set.index <==> .data$Index = 1:nrow(.data) in a sorted data frame by .col==>
.col
set.rank(.data, .col = "Read.count")