# NOT RUN {
n <- 1000
x <- runif(n, 0, 1)
y <- x^2 + rnorm(n, 0, 1)
z <- runif(n, 0, 1)
sample_df <- data.frame(x, y, z)
#qad (Not Run)
model <- pairwise.qad(sample_df, permutation = FALSE)
heatmap.qad(model, select = "dependence", fontsize = 6)
# }
Run the code above in your browser using DataLab