Olhando para a página da Wikipedia, temos a correlação parcial entre e Y, dado que Z é dado por:XYZ
ρXY|Z=ρXY−ρXZρYZ1−ρ2XZ−−−−−−−√1−ρ2YZ−−−−−−√>ρXY
Então, simplesmente exigimos
ρXY>ρXZρYZ1−1−ρ2XZ−−−−−−−√1−ρ2YZ−−−−−−√
O lado direito tem um mínimo global quando . Esse mínimo global é - 1 . Eu acho que isso deve explicar o que está acontecendo. Se a correlação entre Z e Y for o sinal oposto à correlação entre Z e X (mas com a mesma magnitude), a correlação parcial entre X e Y, dado Z , sempre será maior ou igual à correlação entre X e YρXZ= - ρYZ- 1ZYZXXYZXY. Em certo sentido, a correlação condicional "mais" e "menos" tende a cancelar na correlação incondicional.
ATUALIZAR
Eu fiz algumas coisas com R, e aqui está um código para gerar alguns gráficos.
partial.plot <- function(r){
r.xz<- as.vector(rep(-99:99/100,199))
r.yz<- sort(r.xz)
r.xy.z <- (r-r.xz*r.yz)/sqrt(1-r.xz^2)/sqrt(1-r.yz^2)
tmp2 <- ifelse(abs(r.xy.z)<1,ifelse(abs(r.xy.z)<abs(r),2,1),0)
r.all <-cbind(r.xz,r.yz,r.xy.z,tmp2)
mycol <- tmp2
mycol[mycol==0] <- "red"
mycol[mycol==1] <- "blue"
mycol[mycol==2] <- "green"
plot(r.xz,r.yz,type="n")
text(r.all[,1],r.all[,2],labels=r.all[,4],col=mycol)
}
então você envia initial.plot (0.5) para ver quando uma correlação marginal de 0,5 corresponde a uma correlação parcial. O gráfico é codificado por cores para que a área vermelha represente a correlação parcial "impossível", a área azul onde e a área verde onde 1 > | p | > | ρ X Y | Z | Abaixo está um exemplo para ρ X Y = r = 0,5| p | < | ρXY| Z| <11 > | p | > | ρXY| Z|ρXY= r = 0,5