Learn R Programming

simone (version 0.1-3)

InferEdges: Edge Inference

Description

Estimate the inverse covariance matrix from a i.i.d. size--$n$ sample of a multivariate normally distributed random vector.

Usage

InferEdges(data, penalty, method="glasso", ...)

Arguments

data
A $n \times p$ data matrix containing i.i.d. size--$n$ sample taken from a multivariate normally distributed random size--$p$ vector.
penalty
Penalty to use. Can be a numerical matrix of size $p \times p$ or a scalar value. If NULL, a default conservative penalty is calculated that will lead to very sparse graph.
method
A string that defines the method to use for the estimation of the inverse covariance matrix: either "glasso", "regressionAND" or "regressionOR". Default is "glasso".
...
Additional arguments are available, see Details

Value

  • Return a list with the two following components:
  • Sigma.hatThe $p \times p$ estimated covariance matrix.
  • K.hatThe $p \times p$ estimated inverse covariance (or precision) matrix.
  • Note that Sigma.hat is NULL for "regressionOR" and "regressionAND", since the precision matrix K.hat is the only one estimated with these methods.

Details

InferEdges is a wrapper for accessing our implementation in C of several algorithms for estimating inverse covariance matrices. Given the link between such matrices and corresponding graph precision matrices, we currently substitute the latter for the former, hence the name InferEdges. The implemented inference algorithms are : [object Object],[object Object],[object Object] The penalty term can be a scalar or a matrix. For the latter, the penalty is applied term-to-term to the inverse covariance matrix estimator, thus penalizing each entry differently.

Additional arguments are :

[object Object],[object Object],[object Object]

References

Banerjee, O., El Ghaoui, L. and d'Aspremont, A. Model selection through sparse maximum likelihood estimation for multivariate Gaussian or binary data, Jour. Mach. Learn. Res., 9, p.~485--516, 2008.

Friedman, J., Hastie, T. and Tibshirani, R. Sparse inverse covariance estimation with the graphical lasso, 9(3), p.~ 432--441, Biostatistics, 2008.

Meinshausen, N. and B"uhlmann, P. High-dimensional graphs and variable selection with the lasso, Ann. Statist., 34(3), p.~1436--1462, 2006

See Also

SimDataAffiliation, Gplot, Mplot

Examples

Run this code
library(simone)

  ## Generating a graph with an associated Gaussian sample
  p <- 100
  n <- 200
  proba.in  <- 0.15
  proba.out <- 0.005
  alpha <- c(.6,.4)
  X <- SimDataAffiliation (p, n, proba.in, proba.out, alpha)

  ## Network inference
  rho <- 0.18
  res <- InferEdges(X$data, rho)

  ## Results, plotting and comparison
  par(mfrow=c(2,2))
  g <- Gplot(X$K.theo, X$cl.theo, main="Theoretical graph")
  Mplot(X$K.theo, X$cl.theo, main="Theoretical Mplot")
  Gplot(res$K.hat, coord=g, main="GLasso Inference")
  Mplot(res$K.hat, X$cl.theo, main="Inferred Mplot")

Run the code above in your browser using DataLab