53 lines
1.6 KiB
Lua
53 lines
1.6 KiB
Lua
|
-- loveutils.table : simple functions for table manipulation and computation.
|
||
|
|
-- TODO: could be a part of loveutils.math ?
|
||
|
|
|
||
|
|
--[[
|
||
|
|
Copyright © 2019 Kazhnuz
|
||
|
|
|
||
|
|
Permission is hereby granted, free of charge, to any person obtaining a copy of
|
||
|
|
this software and associated documentation files (the "Software"), to deal in
|
||
|
|
the Software without restriction, including without limitation the rights to
|
||
|
|
use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
|
||
|
|
the Software, and to permit persons to whom the Software is furnished to do so,
|
||
|
|
subject to the following conditions:
|
||
|
|
|
||
|
|
The above copyright notice and this permission notice shall be included in all
|
||
|
|
copies or substantial portions of the Software.
|
||
|
|
|
||
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
|
||
|
|
FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
|
||
|
|
COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
|
||
|
|
IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
||
|
|
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||
|
|
]]
|
||
|
|
|
||
|
|
local Table = {}
|
||
|
|
|
||
|
|
function Table.reduce(list, fn)
|
||
|
|
local acc
|
||
|
|
for k, v in ipairs(list) do
|
||
|
|
if 1 == k then
|
||
|
|
acc = v
|
||
|
|
else
|
||
|
|
acc = fn(acc, v)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return acc
|
||
|
|
end
|
||
|
|
|
||
|
|
function Table.sum(table)
|
||
|
|
local sum = 0
|
||
|
|
for _, v in kpairs(table) do
|
||
|
|
sum = sum + v
|
||
|
|
end
|
||
|
|
|
||
|
|
return v
|
||
|
|
end
|
||
|
|
|
||
|
|
function Table.average(table)
|
||
|
|
return Table.sum(table) / #table
|
||
|
|
end
|
||
|
|
|
||
|
|
return Table
|