R语言如何Weighted adjusted linear regression呢？

R语言如何实现Weighted adjusted linear regression
求解答，谢谢！

问题解决了吗