R语言中介效应检验的问题

R语言，利用ipwpoint计算逆概率权重后，用mediation包检验中介效应，出现权重及模型不可识别的情况。
具体而言，如下：
med.fit: M=α1+β1*X 该模型加了以X计算的逆概率权重
out.fit:   Y=α2+β2*X+β3*M   该模型加了x的逆概率权重乘M的逆概率权重。
用mediation拟合的时候，出现如下提示：

weights taken as sampling weights, not total number of trials
Error in mediate(med.fit, out.fit, treat = "X", mediator = "M",  :
  weights on outcome and mediator models not identical

求大神指点！！！