# Test par defaut
cor1.var1<-1:30+rnorm(30,0,2)
cor1.var2<-1:30+rnorm(30,0,3)
cor2.var1<--1:-30+rnorm(30,0,2)
cor2.var2<--1:-30+rnorm(30,0,3)
cor.2comp(cor1.var1,cor1.var2,cor2.var1,cor2.var2)
# Seuil de significativite a 3 pc et conformite du coefficient de correlation commun
# avec la valeur 0.5
cor.2comp(cor1.var1,cor1.var2,cor2.var1,cor2.var2,alpha=0.03,theo=0.5)
Run the code above in your browser using DataLab