题意:一个矩阵,让你从左上角走到右下角,只能向右或者向下走,然后再从右下角走到左上角,只能向左或者向上走,每次走过的点不能再走。
分析:费用流建图,因为每个点只能被走一次,所以可以拆点,将点X拆成X和X+n*n,连一条边,权值为1,代价为0,图中两个点需要特殊处理,因为0点和n*n-1点可以被走两次,所以他们的边权值为2,代价为0,然后对于每个点,向下向右建图即可。
代码:
//O(Kn^2m)
//如果要求最大费用的话 只需在加边的时候加-的边 输出时输出-ans即可
#pragma comment(linker,"/STACK:102400000,102400000")
#include <iostream>
#include <string.h>
#include <stdio.h>
#include <algorithm>
#include <vector>
#include <string>
#include <math.h>
#include <queue>
#include <stack>
#include <map>
#include <set>
using namespace std;
typedef long long ll; //记得必要的时候改成无符号
const int maxn=2000;
const int maxm=1000005;
const int INF=1000000000;
struct EdgeNode{
int from;
int to;
int flow;
int cost;
int next;
}edge[maxm];
int head[maxn],cnt;
void add(int x,int y,int z,int c)
{
edge[cnt].from=x;edge[cnt].to=y;edge[cnt].flow=z;edge[cnt].cost=c;edge[cnt].next=head[x];head[x]=cnt++;
edge[cnt].from=y;edge[cnt].to=x;edge[cnt].flow=0;edge[cnt].cost=-c;edge[cnt].next=head[y];head[y]=cnt++;
//printf("%d %d %d %d\n",x,y,z,c);
}
void init()
{
cnt=0;
memset(head,-1,sizeof(head));
}
int S,T,n,m;
int d[maxn],in[maxn],pre[maxn];
queue<int>Q;
bool spfa(int S,int T)
{
int u,v,f,c;
while(!Q.empty())Q.pop();
memset(in,0,sizeof(in));
for(int i=0;i<=n;i++)d[i]=INF;
d[S]=0;
Q.push(S);
while(!Q.empty())
{
u=Q.front(); Q.pop(); in[u]=0;
for(int i=head[u];i!=-1;i=edge[i].next){
v=edge[i].to; f=edge[i].flow; c=edge[i].cost;
if(f&&d[u]+c<d[v]){
d[v]=d[u]+c; pre[v]=i;
if(!in[v]){
in[v]=1;
Q.push(v);
}
}
}
}
if(d[T]==INF)return false;
return true;
}
int MCMF(int S,int T,int need=0)
{
int u;
int max_flow=0;
int min_cost=0;
while(spfa(S,T))
{
int flow=INF;
u=T;
while(u!=S){
flow=min(flow,edge[pre[u]].flow);
u=edge[pre[u]].from;
}
u=T; max_flow+=flow; min_cost+=d[T]*flow;
while(u!=S){
edge[pre[u]].flow-=flow;
edge[pre[u]^1].flow+=flow;
u=edge[pre[u]].from;
}
}
if(max_flow<need) return -1;
return min_cost;
}
int dis[3][3]={{0,1},{1,0}};
int main()
{
int i,j,g[35][35],k,x,y,s,t;
while(~scanf("%d",&n))
{
init();
S=2*n*n; T=2*n*n+1;
add(S,0,2,0);
for(i=0;i<n;i++){
for(j=0;j<n;j++){
scanf("%d",&g[i][j]);
s=i*n+j;
if(s==0||s==n*n-1)
add(s,s+n*n,2,0);
else
add(s,s+n*n,1,0);
}
}
for(i=0;i<n;i++){
for(j=0;j<n;j++){
for(k=0;k<2;k++){
x=i+dis[k][0];
y=j+dis[k][1];
if(x<0||x>=n||y<0||y>=n)continue;
s=i*n+j; t=x*n+y;
add(s+n*n,t,1,-g[x][y]);
}
}
}
add(n*n-1+n*n,T,2,0);
t=n-1;
n=T;
printf("%d\n",-MCMF(S,T)-g[t][t]+g[0][0]);
}
return 0;
}