一个字符串中的每个字符在另一个字符串中存在于任意顺序

尝试一下：

rooms = {"n", "s", "e", "w", "nw", "ns", "ne", "sw", "se", "ew", "nsw", "nse", "swe", "nwe", "nsew"}

function normalize(s)
    local t = ""
    if s:match("n") then t = t .. "n" .. ".*" end
    if s:match("s") then t = t .. "s" .. ".*" end
    if s:match("e") then t = t .. "e" .. ".*" end
    if s:match("w") then t = t .. "w" end
    return t
end

p = normalize("es")

for i, v in ipairs(rooms) do
    if v:match(p) then print(v) end
end

我尝试寻找任意字母组合的解决方案，同时保证样本中的每个字母必须存在：

local rooms = { "n", "s", "e", "w", "nw", "ns", "ne", "sw", "se", "ew", "nsw", "nse", "swe", "nwe", "nsew" }

function MyFind (inp, str)
      if str=="" then return false end
      local found=true
      string.gsub(str, '.', function (c)  -- 这段代码可以用 'for' 循环替代
            if inp:find(c) and found then found=true else  found=false end
          end)
      return found ,inp
 end

local chars = "se"    -- 一个、两个、三个或更多字母
for _,v in pairs(rooms) do
      a,b = MyFind (v, chars)
      if a then print (b) end
end

输出：

se
nse
swe
nsew