datac$rank <- mapvalues(data$rank, from = c(1,2,3,4),
to= c(4,3,2,1), warn_missing = TRUE)
Error in data$rank : object of type 'closure' is not subsettable
datac$rank <- mapvalues(data$rank, from = c(1,2,3,4),
to= c(4,3,2,1), warn_missing = TRUE)
Error in data$rank : object of type 'closure' is not subsettable