当前位置:网站首页>用pulp库解决运输问题【详细】
用pulp库解决运输问题【详细】
2022-08-03 05:11:00 【北北的巷栀酒】
这是一个非常经典的运输问题:

我发现网上有许多关于这个问题的代码,但是都没有注释或解说,所以我在代码中加上了注释,以便于更好的理解,有不懂的欢迎留言,或者看看我的另一篇文章https://blog.csdn.net/m0_59309242/article/details/119352731,或许就能找到答案
import pulp
import numpy as np
from pprint import pprint #导入库函数
def transportation_problem(costs, x_max, y_max):
row = len(costs) #规定行数
col = len(costs[0]) #规定列数
prob = pulp.LpProblem(sense=pulp.LpMaximize)
var = [[pulp.LpVariable(f'x{i}{j}', lowBound=0, cat='Integer') for j in range(col)] for i in range(row)] #规定变量,此处的f''是为了将x,y传给i,j
flatten = lambda x: [y for l in x for y in flatten(l)] if type(x) is list else [x] #匿名函数,总而言之是为了变成一维数组
prob += pulp.lpDot(flatten(var), costs.flatten()) #做点积
for i in range(row):
prob += (pulp.lpSum(var[i]) <= x_max[i]) #lp计算序列的和,用lpsum比普通的sum快很多;此处属于添加条件使各作物小于计划播种面积
for j in range(col):
prob += (pulp.lpSum([var[i][j] for i in range(row)]) <= y_max[j])
prob.solve()
return {'objective':pulp.value(prob.objective), 'var': [[pulp.value(var[i][j]) for j in range(col)] for i in range(row)]}
if __name__ == '__main__':
costs = np.array([[500, 550, 630, 1000, 800, 700],
[800, 700, 600, 950, 900, 930],
[1000, 960, 840, 650, 600, 700],
[1200, 1040, 980, 860, 880, 780]])
max_plant = [76, 88, 96, 40]
max_cultivation = [42, 56, 44, 39, 60, 59]
res = transportation_problem(costs, max_plant, max_cultivation) #调用函数
print(f'最大值为{res["objective"]}')
print('各变量的取值为:')
pprint(res['var'])代码中flatten的用法在这儿https://blog.csdn.net/m0_59309242/article/details/119464565
得到的结果是:

边栏推荐
猜你喜欢

Pr第二次培训笔记

【HMS core】【Ads Kit】Huawei Advertising——Overseas applications are tested in China. Official advertisements cannot be displayed

junit总结

Exception(异常) 和 Error(错误)区别解析

13.
lt.647. Palindromic substring + lt.516. Longest palindrome subsequence 高效率科研神器——小软件、大能量

MCM box model modeling method and source analysis of atmospheric O3

Modelarts第一次培训

13.< tag-动态规划和回文字串>lt.647. 回文子串 + lt.516.最长回文子序列

如何不耍流氓的做运维之-SHELL脚本
随机推荐
1059 C语言竞赛 (20 分)(C语言)
接口和抽象
Redis常用命令
曲线特征----曲线弯曲程度的探究
Talking about GIS Data (5) - Geographic Coordinate System
Install IIS services (Internet Information Services (Internet Information Services, abbreviated IIS, Internet Information Services)
OptionError: ‘Pattern matched multiple keys‘
Alienware上线首个数字时装AR试穿体验
Get the Ip tool class
FileZilla 搭建ftp服务器
3. 无重复字符的最长子串
js implements a bind function
IO流及其操作
【 Harmony OS 】 【 ano UI 】 lightweight data storage
Shell conditional statement judgment
力扣561. 数组拆分
NotImplementedError: file structure not yet supported
轨迹(形状)相似性判断与度量方法
反射注解基础
在树莓派上搭建属于自己的网页(2)