9 lines
139 B
R
9 lines
139 B
R
|
### regression tests
|
||
|
|
|
||
|
|
library(MASS)
|
||
|
|
|
||
|
|
contr.sdif(6)
|
||
|
|
contr.sdif(6, sparse=TRUE)
|
||
|
|
stopifnot(all(contr.sdif(6) == contr.sdif(6, sparse=TRUE)))
|
||
|
|
|