SCM

SCM Repository

[matrix] Diff of /pkg/R/pedigree.R
ViewVC logotype

Diff of /pkg/R/pedigree.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1279, Tue May 23 08:01:11 2006 UTC revision 1280, Tue May 23 08:01:44 2006 UTC
# Line 50  Line 50 
50  setMethod("chol", "pedigree",  setMethod("chol", "pedigree",
51            function(x, pivot, LINPACK) {            function(x, pivot, LINPACK) {
52                ttrans <- solve(t(as(x, "dtCMatrix")))                ttrans <- solve(t(as(x, "dtCMatrix")))
53                .Call("pedigree_chol", x,                .Call(pedigree_chol, x,
54                      as(diagU2N(t(ttrans)), "dtCMatrix"),                      as(diagU2N(t(ttrans)), "dtCMatrix"),
55                      PACKAGE = "Matrix")                      PACKAGE = "Matrix")
56            })            })

Legend:
Removed from v.1279  
changed lines
  Added in v.1280

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