[lua]笔试-按字典序列出指指定的序列的位置

计算方法：
n的阶乘记为f(n), s为输入序列, sub(i)为s的i到n的子序列。A(i)为第i位对应的字母在子序列sub(i)中的字典顺序
N(s) = sum_{1,n} T(i)*(A(i) - 1) + 1
T(i)为i - 1的阶乘。

--[[
在线编程题1
比大小：

Time Limit: 3000/2000 MS (Java/Others) Memory Limit: 131072/65536 K (Java/Others)
Problem Description:
现在有"abcdefghijkl”12个字符，将其所有的排列中按字典序排列，给出任意一种排列，说出这个排列在所有的排列中是第几小的？

abcdefghijkl
hgebkflacdji
gfkedhjblcia

1
302715242
260726926

计算方法：
n的阶乘记为f(n), s为输入序列, sub(i)为s的i到n的子序列。A(i)为第i位对应的字母在子序列sub(i)中的字典顺序
N(s) = sum_{1,n} T(i)*(A(i) - 1)  + 1
T(i)为i - 1的阶乘。
--]]

local s = "abcdefghijkl"

local function factorial(n)
	local f = 1
	for i=1,n do
		f = f * i
	end
	return f
end

function N(s)
	if type(s) ~= 'string' or #s == 0 then
		error('unexpected input')
	end

	local A = {a=1,b=2,c=3,d=4,e=5,f=6,g=7,h=8,i=9,j=10,k=11,l=12}
	local sum = 0
	local len = #s
	for i=1, len - 1 do
		local T = factorial(len - i)
		local a = string.sub(s,i,i)
		sum = sum + T * (A[a] - 1)
		for k, v in pairs(A) do
			if k > a then
				A[k] = A[k] - 1
			end
		end
		A[a] = 0
	end

	sum = sum + 1

	return sum
end

print(N("abcdefghijkl"))
print(N("hgebkflacdji"))
print(N("gfkedhjblcia"))
print(N("bacd"))

1
302715242
260726926