Resampling and estimate mean, maximum and minimum values in R

Question

I have the following dataframe

df <- data.frame(a=c(\'1\',\'1\',\'1\',\'1\'\'2\',\'2\',\'2\',\'2\'),
             b=c(\'1\',\'2\',\'3\',\'4\',\'1\',\'2\',\