# NOT RUN {
data(duncan)
prestige <- duncan$prestige
# specify knots
sm.conv(prestige, knots=c(3,9,30,57,86,97))
# specify number of knots
prestige.smconv <- sm.conv(prestige, numknots=7)
# check attributes
attributes(prestige.smconv)
# }
Run the code above in your browser using DataLab