% 定义变量 n = 55; % 景区数量 m = 25; % 推介方案数量 x = zeros(n, m); % 景区在推介方案中的接待次数 y = zeros(n, m); % 景区是否在推介方案中出现 z = zeros(n, 1); % 景区级别 % 初始化数据 z([1 2 3 4 7 8 9 10 11 12 13 14 15 16 17 18 19 20 23 24 25 26 27 28 29 30 37 38 39 40 41 42 43]) = 1; % 4A景区 tasks = [10*ones(1, 20), 5*ones(1, 5)]; % 每种任务数量 Aeq = zeros(n+m,2*n*m); % 等式约束矩阵 beq = zeros(n+m, 1); % 等式约束向量 lb = zeros(n*m, 1); % 变量下界 ub = Inf(n*m, 1); % 变量上界 intcon = 1:n*m; % 整数变量 % 构造约束条件 for i = 1:n for j = 1:m Aeq(i, (j-1)*n+1:j*n) = repmat(y(i, j), 1, n); end end for j = 1:m Aeq(n+j, (j-1)*n+1:j*n) = z' .* y(:, j)'; beq(n+j) = 0.5 * sum(y(:, j)); beq(n+j) = tasks(j); end % 求解线性规划 f = [zeros(1, n*m), ones(1,n*m)]; A = []; b = []; [x, fval] = intlinprog(f, intcon, A, b, Aeq, beq, lb, ub); % 输出结果 disp(['最小差值：', num2str(fval)]); disp('推介方案如下：'); for j = 1:m disp(['第', num2str(j), '个方案：']); for i = 1:n if x((j-1)*n+i) > 0 disp(['景区', num2str(i), '接待次数：', num2str(x((j-1)*n+i))]); end end end帮我修改下代码解决if x((j-1)*n+i) > 0索引超过数组元素的问题

在代码中，如果使用索引 `(j-1)*n+i` 访问 `x` 数组中的元素，可能会超出数组的范围。为了避免这种情况，可以使用 `sub2ind` 函数将二维索引转换为一维索引，然后再访问 `x` 数组中的元素。

修改后的代码如下：

% 定义变量
n = 55;  % 景区数量
m = 25;  % 推介方案数量
x = zeros(n, m);  % 景区在推介方案中的接待次数
y = zeros(n, m);  % 景区是否在推介方案中出现
z = zeros(n, 1);  % 景区级别

% 初始化数据
z([1 2 3 4 7 8 9 10 11 12 13 14 15 16 17 18 19 20 23 24 25 26 27 28 29 30 37 38 39 40 41 42 43]) = 1;  % 4A景区
tasks = [10*ones(1, 20), 5*ones(1, 5)];  % 每种任务数量

Aeq = zeros(n+m,n*m);  % 等式约束矩阵
beq = zeros(n+m, 1);  % 等式约束向量
lb = zeros(n*m, 1);  % 变量下界
ub = Inf(n*m, 1);  % 变量上界
intcon = 1:n*m;  % 整数变量

% 构造约束条件
for i = 1:n
    for j = 1:m
        Aeq(i, sub2ind([n,m],i,j)) = y(i, j);
    end
end

for j = 1:m
    Aeq(n+j, sub2ind([n,m],1:n,j)) = z' .* y(:, j)';
    beq(n+j) = tasks(j);
end

% 求解线性规划
f = [zeros(1, n*m), ones(1,n*m)];
A = [];
b = [];
[x, fval] = intlinprog(f, intcon, A, b, Aeq, beq, lb, ub);

% 输出结果
disp(['最小差值：', num2str(fval)]);
disp('推介方案如下：');
for j = 1:m
    disp(['第', num2str(j), '个方案：']);
    for i = 1:n
        if x(sub2ind([n,m],i,j)) > 0
            disp(['景区', num2str(i), '接待次数：', num2str(x(sub2ind([n,m],i,j)))]);
        end
    end
end