想请教R语言怎么做重叠加权法（overlap weighting)