how can i save the trained-model?

[GitHUB-ZYD]

if I save all image throw save.image("all_value.rdata"),then if I load it ,the trained-model could not be use to predict again!!
it throw the error below:

predscores <- predict_GSModel(GSModel = trainGSmodel,testMat = Markers[testIdx,],markerImage=markerImage)
Error in .External(list(name = "CppMethod__invoke_notvoid", address = <pointer: (nil)>, :
NULL value passed as symbol address

[cma2015]

In the R programming language, you can use the save() function to save your trained-model in RData format.