A <- as.data.frame(A)
PerQkm <- A$`Population`/A$`Area`
A <- cbind(A, PerQkm)
maximum <- sapply(A,max)
minimum <- sapply(A,min)
Now, the question is, I have to print out the maximum of each column, but I have to print out the countries to each maximum, too, which are the row names. Is there any way to do it?
I tried so many options with rownames, row.names, names etc...