函数型最小二乘法R语言

有哪个大神知道 线性模型用函数型最小二乘法 的R语言代码吗？求解答🥺