Question

我需要比较以查看两个表是否相同 - 就像在相同的内容中一样。两个表都有表格作为键。

例如：

t1 = {{1,1},{2,2}}
t2 = {{1,1},{2,2}}
t3 = {{1,1},{2,2},{3,3}}

t1和t2应该相等，但t1和t3不应该相等。

Answer 1

我的解决方案不是绝对的（不喜欢密钥），但应该使用您提出问题的嵌套表。我的概念是递归和简单的：

从每个输入中输入一个条目，确保它们：匹配类型，两个都是表，两个表的长度相同。如果这三件事都成立，你现在可以1：1递归地比较两个表。如果类型不匹配或表的长度不同，则表示自动失败。

function compare (one, two)

    if type(one) == type(two) then
        if type(one) == "table" then
            if #one == #two then

                -- If both types are the same, both are tables and 
                -- the tables are the same size, recurse through each
                -- table entry.
                for loop=1, #one do
                    if compare (one[loop], two[loop]) == false then
                        return false
                    end
                end 

                -- All table contents match
                return true
            end
        else
            -- Values are not tables but matching types. Compare
            -- them and return if they match
            return one == two
        end
    end
    return false
end

do
    t1 = {{1,1},{2,2}}
    t2 = {{1,1},{2,2}}
    t3 = {{1,1},{2,2},{3,3}}

    print (string.format(
        "t1 == t2 : %s", 
        tostring(compare (t1,t2))))

    print (string.format(
        "t1 == t3 : %s", 
        tostring(compare (t1,t3))))
end

输出结果为：

t1 == t2 : true
t1 == t3 : false

Answer 2

另一种方法是以shown in Programming in Lua的方式序列化两个表。这将生成一组字符串的输出，这些字符串在运行时将重新创建表。将序列化程序的输出存储在表中，而不是输出它们以进行比较。

将两个表序列化为字符串集合后，将序列化表A中的所有行与序列化表B中的所有行进行比较并删除它们之间的任何重复都很简单。如果在处理表A的末尾，表A或表B中还有任何行，则它们不相等。

序列化为字符串表的代码（从PIL修改）并比较两个表a和b：

function basicSerialize (o)
    if type(o) == "number" then
      return tostring(o)
    else   -- assume it is a string
      return string.format("%q", o)
    end
end

function save (name, value, saved, output)
    saved = saved or {}       -- initial value
    output = output or {}     -- initial value
    if type(value) == "number" or type(value) == "string" then
        table.insert (output, name .. " = " .. basicSerialize(value))
    elseif type(value) == "table" then
        if saved[value] then    -- value already saved?
            table.insert (output, name .. " = " .. saved[value])  -- use its previous name
        else
            saved [value] = name   -- save name for next time
            table.insert (output, name .. " = {}")     -- create a new table
            for k,v in pairs(value) do      -- save its fields
                local fieldname = string.format("%s[%s]", name, basicSerialize(k))
                save (fieldname, v, saved, output)
            end
        end
    else
        error("cannot save a " .. type(value))
    end
    return output
end

function compareSerializedTable (t1, t2)
    if (#t1 ~= #t2) then
        return false
    end

    for i = #t1, 1, -1 do
        local line = t1 [i]
        for k, comp in ipairs (t2) do
            if (line == comp) then
                table.remove (t1, i)
                table.remove (t2, k)
                break
            end
        end
    end

    return (#t1 == 0 and #t2 == 0)
end

t1 = {{1,1},{2,2}}
t2 = {{1,1},{2,2}}
t3 = {{1,1},{2,2},{3,3}}

o1 = save ('t', t1)
o2 = save ('t', t2)
o3 = save ('t', t3)

print (compareSerializedTable (o1, o2)) --true
print (compareSerializedTable (o1, o3)) --false

Answer 3

您要寻找的是表格比较。这不是该语言的内置功能，因为它具有许多不同的实现。

一个常见的方法是进行深度比较。以下函数将深入比较表，它具有第三个参数来忽略或不忽略元表。

function deepcompare(t1, t2, ignore_mt)
    local ty1 = type(t1)
    local ty2 = type(t2)
    if ty1 ~= ty2 then
        return false
    end
    -- non-table types can be directly compared
    if ty1 ~= "table" and ty2 ~= "table" then
        return t1 == t2
    end
    -- as well as tables which have the metamethod __eq
    local mt = getmetatable(t1)
    if not ignore_mt and mt and mt.__eq then
        return t1 == t2
    end
    for k1, v1 in pairs(t1) do
        local v2 = t2[k1]
        if v2 == nil or not deepcompare(v1, v2) then
            return false
        end
    end
    for k2, v2 in pairs(t2) do
        local v1 = t1[k2]
        if v1 == nil or not deepcompare(v1, v2) then
            return false
        end
    end
    return true
end

有关更多信息，请参见：https://web.archive.org/web/20131225070434/http://snippets.luacode.org/snippets/Deep_Comparison_of_Two_Values_3

比较lua中的表，其中键是表

3 个答案: