R/pcor.R
In achambaz/tmle.npvi: Targeted Learning of a NP Importance of a Continuous Exposure
partialCorrelation <- function(x) {
conc <- solve(var(x))
resid.sd <- 1/sqrt(diag(conc))
- sweep(sweep(conc, 1, resid.sd, "*"), 2, resid.sd, "*")
}
## cor(x,y)-cor(x,z)*cor(y,z))/(sqrt(1-cor(x,z)^2)*sqrt(1-cor(y,z)^2))
achambaz/tmle.npvi documentation built on May 10, 2019, 5:10 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
partialCorrelation <- function(x) {
conc <- solve(var(x))
resid.sd <- 1/sqrt(diag(conc))
- sweep(sweep(conc, 1, resid.sd, "*"), 2, resid.sd, "*")
}
## cor(x,y)-cor(x,z)*cor(y,z))/(sqrt(1-cor(x,z)^2)*sqrt(1-cor(y,z)^2))
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.