00001 #ifndef MATRIX_SPMATRIX_H 00002 #define MATRIX_SPMATRIX_H 00003 00004 #include "dgeMatrix.h" 00005 #include "R_ext/Lapack.h" 00006 00007 SEXP dspMatrix_validate(SEXP obj); 00008 double get_norm_sp(SEXP obj, char *typstr); 00009 SEXP dspMatrix_norm(SEXP obj, SEXP type); 00010 SEXP dspMatrix_rcond(SEXP obj, SEXP type); 00011 SEXP dspMatrix_solve(SEXP a); 00012 SEXP dspMatrix_matrix_solve(SEXP a, SEXP b, SEXP classed); 00013 SEXP dspMatrix_as_dsyMatrix(SEXP from); 00014 SEXP dspMatrix_matrix_mm(SEXP a, SEXP b, SEXP classed); 00015 SEXP dspMatrix_trf(SEXP x); 00016 00017 #endif