The R Project SVN R

Rev

Rev 58494 | Rev 66586 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 58494 Rev 58511
Line 13... Line 13...
13 
 
 13 
 
14 
removeClass("A")
 14 
removeClass("A")
15 
 
 15 
 
16 
### Find inherited group methods:
 16 
### Find inherited group methods:
17 
stopifnot(require(Matrix))
 17 
stopifnot(require(Matrix))
18 
sm <- selectMethod("-", c("dgCMatrix", "numeric"))
 18 
sm <- selectMethod("-", c("dgCMatrix", "numeric"))# direct match with "Arith"
- 
 
 19 
s2 <- selectMethod("-", c("dtCMatrix", "numeric"))# ambiguity match with "Arith"
19 
stopifnot(sm@generic == "Arith")
 20 
stopifnot(sm@generic == "Arith",
- 
 
 21 
          s2@generic == "Arith")
20 
## was not ok, in R 2.14.1
 22 
## was not ok in R 2.14.x
21 
 
 23