在一个程序中，需要使用已知变量a=15进入一个自己定义的函数中
for (i in 1:10)
{
a=3*i;
shi<-function(x){a*x+3}
}

如何才能做到呢？

其实我的意思是a每次运行程序都在变化，需要将这种变化在函数shi中得到体现，如何实现？

请高手赐教！