show x and y label in corrplot given residuals of chisq.test

Question

Here is some reproducible code:

set.seed(42)
df <- data.frame(
    x = round(runif(n = 100, min = 1, max = 3), 0)
    , y = round(runif(n = 100, min = 1, m