Nothing
library( "micEconNP" )
data( "oecdpanel" )
oecdpanel$yearFactor <- factor( oecdpanel$year )
npModel <- npreg( growth ~ yearFactor + initgdp,
regtype = "ll", gradients = TRUE, data = oecdpanel )
summary( npModel )
summary( npModel$bws )
bw <- sfactor2bw( npModel$bws$sfactor$x, c( "yearFactor", "initgdp" ),
data = oecdpanel )
bw
all.equal( npModel$bws$bw, bw )
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.