The R Project SVN R

Rev

Rev 72619 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 72619 Rev 80296
Line 68... Line 68...
68 
lines(predict(s2, xx), lwd = 5, col = adjustcolor(4, 1/4))
 68 
lines(predict(s2, xx), lwd = 5, col = adjustcolor(4, 1/4))
69 
lines(predict(s2.7,  xx), lwd = 3, col = adjustcolor("red", 1/4))
 69 
lines(predict(s2.7,  xx), lwd = 3, col = adjustcolor("red", 1/4))
70 
lines(predict(s2.11, xx), lwd = 2, col = adjustcolor("forestgreen", 1/4))
 70 
lines(predict(s2.11, xx), lwd = 2, col = adjustcolor("forestgreen", 1/4))
71 
## s2.11 is very close to 's2'
 71 
## s2.11 is very close to 's2'
72 
 
 72 
 
73 
if(!requireNamespace("Matrix") && !interactive())
 73 
if(!requireNamespace("Matrix", quietly = TRUE) && !interactive())
74 
    q("no")
 74 
    q("no")
75 
 
 75 
 
76 
if(Lb.64 && interactive()) ## extra checks (from above), but _not_ part of R checks
 76 
if(Lb.64 && interactive()) ## extra checks (from above), but _not_ part of R checks
77 
    stopifnot(inherits(e, "try-error"))
 77 
    stopifnot(inherits(e, "try-error"))
78 
## in any case:
 78 
## in any case: