SCM

SCM Repository

[matrix] View of /pkg/src/CHMfactor.c
ViewVC logotype

View of /pkg/src/CHMfactor.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1323 - (download) (as text) (annotate)
Mon Jul 17 18:34:45 2006 UTC (13 years, 10 months ago) by bates
File size: 354 byte(s)
Add coersion from CHMfactor to sparseMatrix
				/* CHOLMOD factors */
#include "CHMfactor.h"

SEXP CHMfactor_to_sparse(SEXP x)
{
    cholmod_factor *L = as_cholmod_factor(x), *Lcp;
    cholmod_sparse *Lm;

    Lcp = cholmod_copy_factor(L, &c); Free(L); /* next call changes Lcp */
    Lm = cholmod_factor_to_sparse(Lcp, &c); cholmod_free_factor(&Lcp, &c);
    return chm_sparse_to_SEXP(Lm, -1);
}


root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge