# NOT RUN {
n <- 100
x <- runif(n, 0, 1)
y <- runif(n, 0, 1)
z <- runif(n, 0, 1)
sample_df <- data.frame(x,y,z)
#qad
model <- pairwise.qad(sample_df, permutation = FALSE)
heatmap.qad(model, select = "dependence", fontsize = 5, significance = TRUE, sign.level = 0.05)
# }
Run the code above in your browser using DataLab