深入函数第一篇

1. 函数是第一类值，具有特定的词法域

第一类值

1. 第一类值的意思是函数与 lua 中的其他类型如数字，字符串具有相同的权力
2. 函数可以存储到全局变量或局部变量变量，还可以存储到 table 中
3. 可作为实参传递给其他函数，也可以作为其他函数的返回值

词法域

1. 定义：一个函数可以嵌套在另一个函数中，内部函数可以访问外部函数定义的局部变量

2. 函数与其他所有的值一样都是匿名的，没有名称

3. 讨论print()函数时，相当于在讨论值仅为 print() 的变量

a = {p = print}
a.p("Hello World") -- Hello World
c = print
c("eee") -- eee
print = math.sin
a.p(print(math.pi / 2)) -- 1
sin = a.p
sin(10, 20) -- 10 20

function foo(x)
    return 2 * x
end
-- 等价于
foo = function (x) return 2 * x end

匿名函数

1. 一个函数定义可以是一条赋值语句，这样的函数表达式可以视为函数构造式，这种函数构造式的结果称为匿名函数
2. 一般会将函数赋予全局变量

function foo(x)
    return 2 * x
end
-- 等价于
foo = function(x) return 2 * x end

高阶函数

1. 像 table.sort()这样的函数接收另一个函数作为实参的函数就称它为高阶函数

-- table.sort 对 table 中的所有元素进行排序
network = {
    {name = "atest", IP = "255.255.255.0",}
    {name = "btest2"}, IP = "255.255.255.1"},
    {name = "ctest3"}, IP = "255.255.255.3"},   
    {name = "dtest4"}, IP = "255.255.255.4"},   
}
table.sort(network, 
    function (a, b) 
        return (a.name > b. name)
    end
)
-- 导数 (f(x + d) - f(x)) / d 函数在某一个点处的导数
function derivative (f, delta)
    delta = delta or 1e-4
    return function (x)
            return (f(x + delta) - f(x)) / delta
        end
end
-- sin 的导数是 cos
c = derivative(math.sin)
print(math.sin(1), c(1))
print(math.sin(1), math.cos(0)) 

闭合函数

names = {"Pe", "Tu", "Me"}
grades = {Pe = 10, Tu = 5, Me = 8}
table.sort(names, function (x, y)
            return grades[x] > grades[y]    
        end
    )
-- 按照年级进行排序
print(names[1], names[2], names[3])

function sortByGrade(names, grades)
    table.sort(names, function (x, y)
            return grades[x] > grades[y]    
        end
    )
end
sortByGrade(names, grades)

1. 匿名函数中调用外部函数的形参的变量称为非局部变量。
2. 一个 closure 就是一个一个函数加上该函数所需访问的所有「非局部变量」
3. 如果再次调用 newCounter ，那么他会创建一个新的局部变量 i 从而也会得到一个新的 closure

function newCounter()
    local i = 0
    return function ()
        i = i + 1
        return i
    end
end
c1 = newCounter()
print(c1()) -- 1
print(c1()) -- 2 

-- 重新定义 sin 函数，弧度转为角度
oldSin = math.sin
math.sin = function (x)
    return oldSin(x * math.pi / 180) 
end

do
    local oldSin = math.sin
    local k = math.pi / 180
    math.sin = function (x)
        return oldSin(x * k)
    end
end

-- 限制一个程序访问文件
do
    local oldOpen = io.open
    local access_OK = function (filename, mode)
      -- <检查访问权限的代码>  
    end
    io.open = function (filename, mode)
        if access_OK(filename, mode) then
            print("允许访问")
            return oldOpen(filename, mode)
        else
            print("不允许访问")
            return nil, "access denied"
        end
    end
end