lingo解选最优地址问题（七）、某海岛上有12个主要的居民点,每个居民点的位置（用平面坐标x,y表示,距离单位：km）和居住的人数（R）如下表所示.现在准备在海岛上建一个服务中心为居民

Question

lingo 解选最优地址问题
（七）、某海岛上有12个主要的居民点,每个居民点的位置（用平面坐标x,y表示,距离单位：km）和居住的人数（R）如下表所示.现在准备在海岛上建一个服务中心为居民提供各种服务,那么服务中心应该建在何处?
1 2 3 4 5 6 7 8 9 10 11 12
X 0 8.20 0.50 5.70 0.77 2.87 4.43 2.58 0.72 9.76 3.19 5.55
Y 0 0.50 4.90 5.00 6.49 8.76 3.26 9.32 9.96 3.16 7.20 7.88
R 600 1000 800 1400 1200 700 600 800 1000 1200 1000 1100
求LINGO代码

Answer 1

!a为x坐标 b为y坐标;
sets:
point/1..12/:x,y,r,dis;
endsets
data:
X=0 8.20 0.50 5.70 0.77 2.87 4.43 2.58 0.72 9.76 3.19 5.55;
Y=0 0.50 4.90 5.00 6.49 8.76 3.26 9.32 9.96 3.16 7.20 7.88;
r=600 1000 800 1400 1200 700 600 800 1000 1200 1000 1100;
enddata
@for(point(i):dis(i)=((x(i)-a)^2+(y(i)-b)^2)^(1/2));
min=@sum(point:dis*r);