функция для взвешенных оценок методом наименьших квадратов

Имеется ли в R функция взвешенных наименьших квадратов? В частности, я ищу что-то, что вычисляет точку пересечения и наклон.

Наборы данных

1. 1 3 5 7 9 11 14 17 19 25 29
2. 17 31 19 27 31 62 58 35 29 21 18
3. 102153 104123 96564 125565 132255 115454 114555 132255 129564 126455 124578

Зависимая переменная - это набор данных 3, а наборы данных 1 и 2 - независимые переменные.