The R Project SVN R

Rev

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

Rev 79466 Rev 85990
Line 34... Line 34...
34 
  \code{\link{periodicSpline}},
 34 
  \code{\link{periodicSpline}},
35 
  \code{\link{splineKnots}},
 35 
  \code{\link{splineKnots}},
36 
  \code{\link{splineOrder}}
 36 
  \code{\link{splineOrder}}
37 
}
 37 
}
38 
\examples{
 38 
\examples{
39 
% May have rounding errors rather than true 0, e.g, with Apple Accelerate.
 - 
 
40 
require(graphics)
 39 
require(graphics)
41 
ispl <- polySpline(interpSpline( weight ~ height,  women, bSpline = TRUE))
 40 
ispl <- polySpline(interpSpline( weight ~ height,  women, bSpline = TRUE))
42 
## IGNORE_RDIFF_BEGIN
 41 
\dontdiff{% May have rounding errors rather than true 0, e.g, with Apple Accelerate.
43 
print( ispl )   # print the piecewise polynomial representation
 42 
print( ispl )   # print the piecewise polynomial representation
44 
## IGNORE_RDIFF_END
 43 
}
45 
plot( ispl )    # plots over the range of the knots
 44 
plot( ispl )    # plots over the range of the knots
46 
points( women$height, women$weight )
 45 
points( women$height, women$weight )
47 
}
 46 
}
48 
\keyword{ models }
 47 
\keyword{ models }