How to increase size of labels in histograms of R correlation chart?

Question

I use the following known function for creating an R correlation plot:

# correlation plot #
panel.hist <- function(x)
{
  usr <- par("usr"); o