I'm not sure I 100% follow - are you just looking to see how the numeric data in your dataset correlates? To do so you could just use the cor() function.
cor(dplyr::select(iris, where(is.numeric)))
#> Sepal.Length Sepal.Width Petal.Length Petal.Width
#> Sepal.Length 1.0000000 -0.1175698 0.8717538 0.8179411
#> Sepal.Width -0.1175698 1.0000000 -0.4284401 -0.3661259
#> Petal.Length 0.8717538 -0.4284401 1.0000000 0.9628654
#> Petal.Width 0.8179411 -0.3661259 0.9628654 1.0000000
Created on 2022-03-20 by the reprex package (v2.0.1)