How to use max of a variable in title/subtitle of a plot with glue in r?

Question

I have a user defined function that calculates daily covid cases for a given country and gives out a data frame:

fn_daily_cases <- function(Country_Name =