有二维数据（x,y），使用R语言先求出非参局部多项式m(x)=E(Y|X=x),m(x)可用泰勒展式表示

然后再求相关曲线

怎么用R语言画出相关曲线图，并用Bootstrap方法加上置信区间，不太熟悉非参数这一块，求大神指教