apen.m

在Matlab环境下

function apen=apen(m,p)
apen=a(m+1,p)-a(m,p);