在R语言里，同一个文件下，比如main.r里面
定义了多个函数比如
main1 = function(x){
           a = mian2(x)
           b = main3(x)
           a+b
}

mian2 = function(x){
...
}

mian3 = function(x){
...
}

我想让main2,mian3这两个函数只能在mian1里面调用
也就是说，在source(mian.r)之后，执行mian1是有定义的，但是mian2,mian3是没有定义的
这个应该怎么做？