SCM

SCM Repository

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

Diff of /pkg/R/dsTMatrix.R

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

revision 589, Wed Mar 2 19:53:53 2005 UTC revision 835, Mon Aug 8 13:33:18 2005 UTC
# Line 19  Line 19 
19                i = x@j, j = x@i, x = x@x,                i = x@j, j = x@i, x = x@x,
20                uplo = if (x@uplo == "U") "L" else "U"),                uplo = if (x@uplo == "U") "L" else "U"),
21            valueClass = "dsTMatrix")            valueClass = "dsTMatrix")
22    
23    setMethod("writeHB", signature(obj = "dsTMatrix"),
24              function(obj, file, ...)
25              .Call("Matrix_writeHarwellBoeing",
26                    if (obj@uplo == "U") t(obj) else obj,
27                    as.character(file), "DST"))
28    
29    setMethod("writeMM", signature(obj = "dsTMatrix"),
30              function(obj, file, ...)
31              .Call("Matrix_writeMatrixMarket",
32                    if (obj@uplo == "U") t(obj) else obj,
33                    as.character(file), "DST"))

Legend:
Removed from v.589  
changed lines
  Added in v.835

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