SCM

SCM Repository

[matrix] Diff of /pkg/tests/matr-exp.R
ViewVC logotype

Diff of /pkg/tests/matr-exp.R

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

revision 520, Sat Feb 5 14:41:29 2005 UTC revision 521, Sat Feb 5 17:04:56 2005 UTC
# Line 6  Line 6 
6    
7  m1 <- Matrix(c(1,0,1,1), nc = 2)  m1 <- Matrix(c(1,0,1,1), nc = 2)
8  e1 <- expm(m1)  e1 <- expm(m1)
9  assert.EQ.mat(e1, {e <- exp(1); cbind(c(e,0), e)})  assert.EQ.mat(e1, cbind(c(exp(1),0), exp(1)))
10    
11  m2 <- Matrix(c(-49, -64, 24, 31), nc = 2)  m2 <- Matrix(c(-49, -64, 24, 31), nc = 2)
12  e2 <- expm(m2)  e2 <- expm(m2)

Legend:
Removed from v.520  
changed lines
  Added in v.521

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