Lua 如何使用其中一个表顺序同时对两个表进行排序？

例如：

table1 = {2,3,1}
table2 = {a,b,c}

到

我想：

步骤1：将两个表合并为对{{2，a}，{3，b}，{1，c}

第二步：对配对进行排序

步骤3：取消合并生成的数组

table1 = {2,3,1}
table2 = {"a","b","c"}


-- Comparison function
function compare(x, y)
    return x[1] < y[1]
end

-- Step 1: Merge in pairs
for i,v in ipairs(table1) do
    table1[i] = {table1[i], table2[i]}
end

-- Step 2: Sort
table.sort(table1, compare)

-- Step 3: Unmerge pairs
for i, v in ipairs(table1) do
    table1[i] = v[1]
    table2[i] = v[2]
end

for i = 1,#table1 do
    print(table1[i], table2[i])
end

table1={2,3,1}
表2={“a”、“b”、“c”}
--比较函数
函数比较（x，y）
返回x[1]

尝试此代码，它使用标准函数

表。排序

：

table1 = {2,3,1}
table2 = {"a","b","c"}

table3 = {}
for i,v in ipairs(table1) do
    table3[table2[i]]=v
end

table.sort(table1, function (a,b)
    return table2[a] <= table2[b]
    end)

table.sort(table2, function (a,b)
    return table3[a] <= table3[b]
    end)

print("table1") 
for i,v in ipairs(table1) do
    print(i,v)
end

print("table2") 
for i,v in ipairs(table2) do
    print(i,v)
end

table1={2,3,1}
表2={“a”、“b”、“c”}
表3={}
对于IPAIR中的i，v（表1）do
表3[表2[i]]=v
结束
表.排序（表1，函数（a，b）
return table 2[a]此函数不修改任何一个表，而是返回根据第一个表排序的第二个表。您可以在第一个表中传递键的比较，如在
表中。sort

local sort_relative = function(ref, t, cmp)
    local n = #ref
    assert(#t == n)
    local r = {}
    for i=1,n do r[i] = i end
    if not cmp then cmp = function(a, b) return a < b end end
    table.sort(r, function(a, b) return cmp(ref[a], ref[b]) end)
    for i=1,n do r[i] = t[r[i]] end
    return r
end

结果：

c   a   b

我使用键值对和常规排序函数来完成这项工作：

table1 = {2,3,1}
table2 = {"a","b","c"}

table3 = {}    
for i, v in ipairs(table2) do
    table3[table1[i]] = v
end

table.sort(table1)

table2 = {}
for i = 1,#table1 do
    table2[i]=table3[table1[i]]
end
table3=nil

for i = 1,#table1 do
    print(table1[i], table2[i])
end

有趣的方法，但代价太高。这确实是一种优雅而干净的方法。正如谚语所说，“剥猫皮的方法不止一种”。
c   a   b

table1 = {2,3,1}
table2 = {"a","b","c"}

table3 = {}    
for i, v in ipairs(table2) do
    table3[table1[i]] = v
end

table.sort(table1)

table2 = {}
for i = 1,#table1 do
    table2[i]=table3[table1[i]]
end
table3=nil

for i = 1,#table1 do
    print(table1[i], table2[i])
end