
Last chance! 50% off unlimited learning
Sale ends in
bezier(coo, n)
$J
matrix of Bezier coefficients
$B
matrix of Bezier vertices.
bezier_i
set.seed(34)
x <- coo_sample(efourier_shape(), 5)
plot(x, ylim=c(-3, 3), asp=1, type='b', pch=20)
b <- bezier(x)
bi <- bezier_i(b$B)
lines(bi, col='red')
Run the code above in your browser using DataLab