Lines Matching refs:smat
37 > smat <- as.matrix(tmat)
39 > aeq(smat+2.1, as.matrix(tmat+2.1))
41 > aeq(smat/2.1, as.matrix(tmat/2.1))
43 > aeq(smat-2.1, as.matrix(tmat-2.1))
45 > aeq(smat*2.1, as.matrix(tmat*2.1))
47 > aeq(round(smat,1), as.matrix(round(tmat,1)))
49 > aeq(exp(smat), as.matrix(exp(tmat)))
52 > aeq(sum(smat), sum(tmat))
54 > aeq(prod(smat), prod(tmat))
56 > aeq(sum(smat+3), sum(tmat+3))
58 > aeq(prod(smat+2), prod(tmat+2))
60 > aeq(range(smat), range(tmat))
62 > aeq(max(smat), max(tmat))
64 > aeq(min(smat), min(tmat))
67 > aeq(smat+1:13, tmat+1:13)
69 > aeq(smat+1:13, 1:13 +tmat )
71 > aeq(smat+tmat, 2*smat)
76 > aeq(sort(unique(c(smat))), sort(unique(tmat)))
94 > aeq(smat[zz,zz], as.matrix(tmat[zz,zz]))
97 > all.equal(smat[zz, 8:13], tmat[zz, 8:13]) # both are matrices
101 > aeq(diag(smat), diag(tmat))
103 > zz <- diag(smat)
104 > diag(smat) <- zz*2
106 > all.equal(smat, as.matrix(tmat))