lua程序设计第十一章出现频率最高的单词练习题答案

示例11.1

local counter = {}
 
for line in io.lines() do
  for word in string.gmatch(line,"%w+" ) do
    counter[word]= (counter[word] or 0) + 1
  end
end

local words = {}
 
for w in pairs(counter) do
	words[#words + 1] = w
end


 
table.sort(words,function(w1,w2)
  return counter[w1] > counter[w2] or 
  counter[w1] == counter[w2] and w1 < w2
end)
 
local n=math.min(tonumber(arg[1]) or math.huge,#words)
 
for i=1,n do
  io.write(words[i],"\t",counter[words[i]],"\n")
end

练习题11.1

local counter = {}

for line in io.lines("test.txt") do
  for word in string.gmatch(line,"%w+" ) do
	if #word >= 4 then
    counter[word]= (counter[word] or 0) + 1
	end
  end
end

local words = {}

for w in pairs(counter) do
	words[#words + 1] = w
end



table.sort(words,function(w1,w2)
  return counter[w1] > counter[w2] or
  counter[w1] == counter[w2] and w1 < w2
end)

local n=math.min(3 or math.huge,#words)

for i=1,n do
  io.write(words[i],"\t",counter[words[i]],"\n")
end