Description Usage Arguments Value Author(s) See Also Examples
Prints a summary of the output of bezierCurveFit
(a list of class "bezierCurveFit"
). For each dimension of the point set being fitted, this includes the number of parameters used in the fit, the residual standard error and the reason the fit iterations were stopped. See bezierCurveFit
for details.
1 2 |
object |
a list of class |
... |
further arguments passed to or from other methods. |
a NULL
value.
Aaron Olsen
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | ## RUN BEZIER CURVE FIT ON BEZIER CURVE ##
## BEZIER CONTROL POINTS
p <- matrix(c(0,0, 1,4, 2,2, 3,0, 5,5), nrow=5, ncol=2, byrow=TRUE)
## POINTS ON BEZIER
m <- bezier(t=seq(0, 1, length=300), p=p)
## RANDOM VARIATION (NOISE) AROUND POINTS
## SENDING EXACT POINTS WILL ISSUE WARNING IN NLM FUNCTION
mrnorm <- m + cbind(rnorm(nrow(m), 1, 0.1), rnorm(nrow(m), 1, 0.1))
## RESTORE POSITION OF POINTS
mrnorm <- mrnorm - cbind(rep(1, nrow(m)), rep(1, nrow(m)))
## RUN BEZIER CURVE FIT UNCONSTRAINED NUMBER OF CONTROL POINTS
bfit <- bezierCurveFit(mrnorm)
## GET CURVE FIT SUMMARY
print(summary(bfit))
|
bezierCurveFit Summary
Dimension 1 fit with 6 parameters and RSE of 0.104623. Percent change in RSE (0.00042) is less than maximum percent change in RSE (0.01).
Dimension 2 fit with 6 parameters and RSE of 0.09478754. Percent change in RSE (0.00015) is less than maximum percent change in RSE (0.01).
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.