File 残局文料/lua_lib/算机_程语_月_基类_表_排_基类_数.lua artifact bad3bd57fa part of check-in 89f423ff38

local 字集库 = require("u8_to_a")
local 历排取联库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_排_取联"))
local 返参库 = require(字集库.u8_to_a("算机_程语_月_基类_能_返参"))
local 基算库 = require(字集库.u8_to_a("算机_程语_月_基类_数_基算"))
local 历排库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_排_取全"))
local 数库 = require(字集库.u8_to_a("算机_程语_月_基类_数"))
local s = {}
--~ 排
function s.总和(u1_0)
  return 历排取联库.历排(u1_0, 基算库.加法, 返参库.一参)
  end
--~ 排
function s.均值(u1_0)
  local h1
  --~ 总和
  h1 = s.总和(u1_0)
  return 基算库.除法(h1, #u1_0)
  end
--~ 排
--~ 标准值
function s.方差(u1_0, u1)
  local h1, h2
  local h1_0
  --~ 标准值
  h1 = u1 or s.均值(u1_0)
  --~ 排，用于算方差
  h1_0 = 历排库.历排(u1_0, 基算库.减法, h1)
  h1_0 = 历排库.历排(h1_0, 数库.指数, 2)
  --~ 方差
  h2 = 基算库.除法(s.总和(h1_0), #h1_0)
  return h2
  end
--~ 排
--~ 标准值
function s.标准差(u1_0, u1)
  local h1
  --~ 方差
  h1 = s.方差(u1_0, u1)
  return 数库.指数(h1, 1, 2)
  end
--~ 排
--~ 标准值
function s.均差(u1_0, u1)
  local h1, h2
  local h1_0
  --~ 标准值
  h1 = u1 or s.均值(u1_0)
  --~ 排，用于算均差
  h1_0 = 历排库.历排(u1_0, 基算库.减法, h1)
  h1_0 = 历排库.历排(h1_0, 数库.正数)
  --~ 均差
  h2 = 基算库.除法(s.总和(h1_0), #h1_0)
  return h2
  end
return s