結果

問題 No.748 yuki国のお財布事情
ユーザー 👑 obakyan
提出日時 2019-07-18 22:58:36
言語 Lua
(LuaJit 2.1.1734355927)
結果
AC  
実行時間 323 ms / 2,000 ms
コード長 1,564 bytes
コンパイル時間 230 ms
コンパイル使用メモリ 5,376 KB
実行使用メモリ 25,216 KB
最終ジャッジ日時 2024-12-25 22:43:07
合計ジャッジ時間 3,913 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 26
権限があれば一括ダウンロードができます

ソースコード

diff # 

local function uf_initialize(n)
  local parent = {}
  for i = 1, n do parent[i] = i end
  return parent
end

local function uf_findroot(idx, parent)
  while parent[idx] ~= idx do
    idx = parent[idx]
  end
  return idx
end

local function kruskal(parent, line, force)
  -- line.c, line.i1, line.i2
  table.sort(line, function(a, b) return a.c < b.c end)
  local totalcost = 0
  local linenum = #line
  for i = 1, linenum do
    local c, i1, i2 = line[i].c, line[i].i1, line[i].i2
    local r1, r2 = uf_findroot(i1, parent), uf_findroot(i2, parent)
    parent[i1], parent[i2] = r1, r2
    if force or r1 ~= r2 then
      parent[r2] = r1
      parent[i2] = r1
      totalcost = totalcost + c
    end
  end
  return totalcost
end

local n, m, k = io.read("*n", "*n", "*n")
local a, b, c = {}, {}, {}
local allcost = 0
for i = 1, m do
  a[i], b[i], c[i] = io.read("*n", "*n", "*n")
  allcost = allcost + c[i]
end
local curpos = 1
local forceline, line = {}, {}
for i = 1, k do
  local e = io.read("*n")
  for j = curpos, e - 1 do
  local tmp = {}
    tmp.i1, tmp.i2, tmp.c = a[j], b[j], c[j]
    table.insert(line, tmp)
  end
  local tmp2 = {}
  tmp2.i1, tmp2.i2, tmp2.c = a[e], b[e], c[e]
  table.insert(forceline, tmp2)
  curpos = e + 1
end
for i = curpos, m do
  local tmp = {}
  tmp.i1, tmp.i2, tmp.c = a[i], b[i], c[i]
  table.insert(line, tmp)
end

local parent = uf_initialize(n)
local cost = 0
if 0 < #forceline then
  cost = cost + kruskal(parent, forceline, true)
end
if 0 < #line then
  cost = cost + kruskal(parent, line, false)
end
print(allcost - cost)
0