rpart包中有一个用于剪枝的参数cp，请问该参数具体是怎么算出来的，以及用它进行剪枝主要依据什么原理？