The R Project SVN R

Rev

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

Rev 48011 Rev 48044
Line 1... Line 1...
1 
## tests of the simulate.lm method, added Feb 2009
 1 
## tests of the simulate.lm method, added Feb 2009
2 
 
 2 
 
3 
options(digits = 5)
 3 
options(digits = 5)
4 
 
 4 
 
5 
# recommended pacakges should be present
 5 
# recommended packages should be present
6 
if(!require("MASS")) q()
 6 
if(!require("MASS")) q()
7 
 
 7 
 
8 
## cases should be named
 8 
## cases should be named
9 
fit1 <- lm(time ~ dist, data = hills)
 9 
fit1 <- lm(time ~ dist, data = hills)
10 
set.seed(1)
 10 
set.seed(1)