df <- data.frame(target = rnorm(1000),
var1 = rnorm(1000),
var2 = rnorm(1000))
bootcor.dep(target = df$target,
x1 = df$var1,
x2 = df$var2,
k = 5000,
alpha = .05,
digit = 3,
seed = 1234)
Run the code above in your browser using DataLab