[R] could not find function in mempry inside foreach loop

I'm trying to use foreach function to do multicore computing in R. Error in FUN(train_adjmt, iter = missedmat[i, 1], iter2 = missedmat[i, : task 1 failed - "找不到对象'predictMatrix'" then I call function A in the console. The problem is I'm calling a function Posdef inside B that is defined in

[R] could not find function in mempry inside foreach loop

I'm trying to use foreach function to do multicore computing in R. A <-function() { foreach(i=1:10) %dopar% { B() }} then I call function A in the console. The problem is I'm calling a function ipredictMatrix inside B that is defined in another script file which I source.However