## EXAMPLE 1
n <- 0:5
x <- ChebPoints(32, c(-1, 1))
pval <- ChebPoly(n, x[[1]])
matplot(x[[1]], t(pval),
main = 'Chebyshev polynomials T_n(x) evaluated at Chebyshev points',
type = "l")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.