吴喜子老师的《非参数统计》中题：以CPI作自变量，以GINI作因变量来进行Theil回归，求关于Theil回归系数（一共40个国家的CPI和GINI）。R程序怎么实现，R语言初学者求高手指导，给以帮助，谢谢！
CPI GINI
9.7 25.6
9.5 24.7
9.3 25.0
9.0 31.5
8.7 36.8
8.6 35.2
8.5 25.8
7.8 31.0
7.7 45.0
7.5 57.1
7.3 30.0
7.1 28.7
6.9 35.9
6.3 32.7
6.0 28.4
5.7 70.0
5.6 37.0
5.2 27.3
5.1 44.8
4.9 24.4
4.8 34.0
4.5 35.8
4.2 35.4
4.0 31.6
3.9 40.7
3.8 29.0
3.7 34.4
3.2 51.1
3.1 41.3
3.0 48.5
2.9 44.7
2.7 39.9
2.6 41.0
2.5 49.5
2.4 36.1
2.2 42.0
2.1 37.4
2.0 36.0
1.7 38.1
1.6 50.6