Vector 从Lua中的2个向量中获取公共元素

我有两个向量，比如说

v1=（a，b，c，d，e）

和

v2=（e，h，t，b，w）

，我想得到第三个向量，它包含

v1

和

v2

的公共元素，在这种情况下

v3=（e，b）

---

我已经看到C++中已经问过了，但我不能看到它的Lua.

< P>我假设当你说向量时，代码< V1>代码>和<代码> v2>代码>都是数组表，像这样：

local v1 = {1,2,4,8,16}
local v2 = {2,3,4,5}

local v3 = {}

for k1,v1 in pairs(v1) do
    for k2,v2 in pairs(v2) do
        if v1 == v2 then
            v3[#v3 + 1] = v1
        end
    end
end

然后你可以这样做：

local v1 = {1,2,4,8,16}
local v2 = {2,3,4,5}

local v3 = {}

for k1,v1 in pairs(v1) do
    for k2,v2 in pairs(v2) do
        if v1 == v2 then
            v3[#v3 + 1] = v1
        end
    end
end

---

我假设说向量时，你的意思是

v1

和

v2

都是类似数组的表，如下所示：

local v1 = {1,2,4,8,16}
local v2 = {2,3,4,5}

local v3 = {}

for k1,v1 in pairs(v1) do
    for k2,v2 in pairs(v2) do
        if v1 == v2 then
            v3[#v3 + 1] = v1
        end
    end
end

然后你可以这样做：

local v1 = {1,2,4,8,16}
local v2 = {2,3,4,5}

local v3 = {}

for k1,v1 in pairs(v1) do
    for k2,v2 in pairs(v2) do
        if v1 == v2 then
            v3[#v3 + 1] = v1
        end
    end
end

---

与Yu Hao的解决方案不同，下面的代码以线性时间运行，但它确实需要额外的内存，除非您可以使用

v3

而不是坚持使用

v4

。不过，时间差可能只有在输入向量较大时才会明显

local v1={1,2,4,8,16}
local v2={2,3,4,5}
local v3={}
for k,v in ipairs(v1) do v3[v]=false end
for k,v in ipairs(v2) do if v3[v]==false then v3[v]=true end end
for k,v in  pairs(v3) do if v3[k]==false then v3[k]=nil end end
local v4={}
local n=0
for k,v in  pairs(v3) do n=n+1; v4[n]=k end
for k,v in ipairs(v4) do print(k,v) end

---

与Yu Hao的解决方案不同，下面的代码以线性时间运行，但它确实需要额外的内存，除非您可以使用

v3

而不是坚持使用

v4

。不过，时间差可能只有在输入向量较大时才会明显

local v1={1,2,4,8,16}
local v2={2,3,4,5}
local v3={}
for k,v in ipairs(v1) do v3[v]=false end
for k,v in ipairs(v2) do if v3[v]==false then v3[v]=true end end
for k,v in  pairs(v3) do if v3[k]==false then v3[k]=nil end end
local v4={}
local n=0
for k,v in  pairs(v3) do n=n+1; v4[n]=k end
for k,v in ipairs(v4) do print(k,v) end

---

您可以通过

v1

为其值构建一个查找表，然后通过

v2

查找公共值并将其添加到输出列表中：

function findcommon(a1, a2)
    local in_a1 = {} -- lookup table for a1's values
    for k,v in pairs(a1) do in_a1[v] = true end

    local common = {}
    local n = 0
    for k,v in pairs(a2) do 
        if in_a1[v] then 
            in_a1[v] = false
            n = n + 1
            common[n] = v
        end
    end

    return common
end

举个例子：

v1 = {'a','b','c','d','e'} 
v2 = {'e','h','t','b','w'}
common = findcommon(v1,v2)

print('('..table.concat(common,',')..')')  --> (e,b)

---

您可以通过

v1

为其值构建一个查找表，然后通过

v2

查找公共值并将其添加到输出列表中：

function findcommon(a1, a2)
    local in_a1 = {} -- lookup table for a1's values
    for k,v in pairs(a1) do in_a1[v] = true end

    local common = {}
    local n = 0
    for k,v in pairs(a2) do 
        if in_a1[v] then 
            in_a1[v] = false
            n = n + 1
            common[n] = v
        end
    end

    return common
end

举个例子：

v1 = {'a','b','c','d','e'} 
v2 = {'e','h','t','b','w'}
common = findcommon(v1,v2)

print('('..table.concat(common,',')..')')  --> (e,b)

---

为了防止您想要与更大的向量（数组/集合）相交，这里有一个未测量的过早优化的尝试

local v1 = {1,2,4,8,16}
local v2 = {2,3,4,5}

local function intersect(t1,t2)

        local function make_lookup(t)
            local res={}
            for _,v in ipairs(t) do
                res[v]=true
            end
            return res
        end

        local smaller,larger
        if (#t1>#t2) then
            larger=t1
            smaller=t2
        else
            larger=t2
            smaller=t1
        end

        local lookup=make_lookup(smaller)

        local res={}
        for _,v in ipairs(larger) do
            if lookup[v] then
                res[#res+1]=v
            end
        end
        return res
end

local v1v2_intersected=intersect(v1,v2)

---

内部查找表由两个表中较小的数组表组成。在“生产”中，您可能还需要检查您是否处理正确的输入值，以防您想要与更大的向量（数组/集合）相交，这里是一个未测量的过早优化尝试

local v1 = {1,2,4,8,16}
local v2 = {2,3,4,5}

local function intersect(t1,t2)

        local function make_lookup(t)
            local res={}
            for _,v in ipairs(t) do
                res[v]=true
            end
            return res
        end

        local smaller,larger
        if (#t1>#t2) then
            larger=t1
            smaller=t2
        else
            larger=t2
            smaller=t1
        end

        local lookup=make_lookup(smaller)

        local res={}
        for _,v in ipairs(larger) do
            if lookup[v] then
                res[#res+1]=v
            end
        end
        return res
end

local v1v2_intersected=intersect(v1,v2)

---

内部查找表由两个表中较小的数组表组成。在“生产”中，您可能还想检查您是否在处理正确的输入值

您不会说如果元素

l

在

v1

中重复

n

次，在

v2

中重复

m

次，您希望

l

在

v3

中重复

min（n，m）

。给出的答案已经对期望的结果做出了不同的假设，即使允许重复。你不会说如果元素

l

在

v1

中重复

n

次，在

v2

中重复

m

次，你希望

l

在

v3

中重复

min（n，m）

。给出的答案已经对期望的结果做出了不同的假设，即使允许重复。我理解OP希望看到它在向量上实现，但如果输入是局部的e={[“f”]=10，[“g”]=11，[“h”]=12}局部的f={[“h”]=11，[“h”]=12，[“I”]=13}，则上面的代码不起作用，只对类似数组的表起作用，不dictionaries@PirateApp如果用

对替换
ipairs
，它应该会再次工作：我知道OP希望在它工作的向量上实现这一点，但是如果输入是局部的e={[“f”]=10，[“g”]=11，[“h”]=12}局部的f={[“h”]=11，[“h”]=12，[“I”]=13}它不起作用上面的代码只适用于类似数组的表，而不是dictionaries@PirateApp如果将
ipair
替换为
pairs
，它应该会再次工作：向上投票！您将如何修改它来处理本地e={[“f”]=10、[“g”]=11、[“h”]=12}本地f={[“h”]=11、[“h”]=12、[“i”]=13}，其中输出应该是h12向上投票！您将如何修改它来处理本地e={[“f”]=10、[“g”]=11、[“h”]=12}本地f={[“h”]=11、[“h”]=12、[“i”]=13}，其中输出应该是h12