結果
問題 | No.2263 Perms |
ユーザー |
👑 ![]() |
提出日時 | 2023-04-07 22:28:30 |
言語 | PyPy3 (7.3.15) |
結果 |
AC
|
実行時間 | 113 ms / 2,000 ms |
コード長 | 2,498 bytes |
コンパイル時間 | 304 ms |
コンパイル使用メモリ | 82,432 KB |
実行使用メモリ | 77,460 KB |
最終ジャッジ日時 | 2024-10-02 19:55:34 |
合計ジャッジ時間 | 4,943 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge5 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 2 |
other | AC * 39 |
ソースコード
def Hungarian(A, minimize=False, mode=False):""" 行列 A に対してハンガリアン法を適用し, 最大値を求める.A: 行列minimize: True にすると, 最小値を求めるmode: True にすると, 最大値 (最小値) を達成する例も出力する.Reference: https://judge.yosupo.jp/submission/34963"""if minimize:if mode:score, x=Hungarian([[-a_ij for a_ij in Ai] for Ai in A], False, True)return -score,xelse:return -Hungarian([[-a_ij for a_ij in Ai] for Ai in A], False, False)inf=1<<31N=len(A)fx=[inf]*Nfy=[0]*Nx=[-1]*Ny=[-1]*Ni=0while i < N:t=[-1]*Ns=[i]*(N + 1)p=q=0while p <= q and x[i] < 0:k, j = s[p], 0while j < N and x[i] < 0:if fx[k] + fy[j] == A[k][j] and t[j] < 0:q += 1s[q] = y[j]t[j] = kif s[q] < 0:p = jwhile p >= 0:y[j] = k = t[j]p = x[k]x[k] = jj = pj += 1p += 1if x[i] < 0:d = inffor k in range(q + 1):for j in range(N):if t[j] < 0:d = min(d, fx[s[k]] + fy[j] - A[s[k]][j])for j in range(N):if t[j] >= 0:fy[j] += dfor k in range(q + 1):fx[s[k]] -= delse:i += 1score=0for i,j in enumerate(x):score+=A[i][j]return (score,x) if mode else score#==================================================def solve():N,M=map(int,input().split())A=[None]*NS=[0]*Nfor i in range(N):A[i]=list(map(int,input().split()))if sum(A[i])!=M:print(-1)returnfor j in range(N):S[j]+=A[i][j]if not all(S[j]==M for j in range(N)):print(-1)returnfor _ in range(M):B=[[1 if A[i][j]>0 else 0 for j in range(N)] for i in range(N)]K,P=Hungarian(B,False,True)for i in range(N):A[i][P[i]]-=1print(*[P[i]+1 for i in range(N)])return#==================================================solve()