Disply only the top outliers in R

Question

Is it possible to display the data above the boxplot, which is the outliers alone?

Code :

charges <- read.csv("tempcharges.csv")
data = re