2017-06-11から1日間の記事一覧

TI-Nspire & Lua / 特殊な方程式に対する 4 段の Cowell 法 4 of 4 / 確かめる

参考: パソコンで見る天体の動き, pp.112-119 function cowell4(funcs, t0, inits, h) local unpack = unpack or table.unpack local t0 = t0 local inits = inits local function maxOfErr(listA, listB) local sute = {} for i = 1, #listA do sute[i] = m…

TI-Nspire & Lua / 特殊な方程式に対する 4 段の Cowell 法 3 / 前の近似値から次の近似値と近似値同士の最大誤差とを求める、それに意味のないとき

参考: パソコンで見る天体の動き, pp.112-119 function approx2(funcs, w, preApprox, h) -- ({微分方程式}, {変化しない部分}, {前の近似値}, 刻み幅) local function maxOfErr(listA, listB) local sute = {} for i = 1, #listA do sute[i] = math.abs(lis…

TI-Nspire & Lua / 特殊な方程式に対する 4 段の Cowell 法 2 / 第 1 近似値、第 2 近似値、両者の最大誤差を求める、それに意味のないとき

参考: パソコンで見る天体の動き, p.112-119 function approx(funcs, w, temp, h) -- ({微分方程式}, {変化しない部分}, {假定値}, 刻み幅) local function maxOfErr(listA, listB) local sute = {} for i = 1, #listA do sute[i] = math.abs(listA[i] - lis…

TI-Nspire & Lua / 特殊な方程式に対する 4 段の Cowell 法 1 / 変化しない部分と假定値とを求める、それに意味のないとき

参考: パソコンで見る天体の動き, pp.112-119 function staticVals(funcs, inits, h) --local function emptyMat(numOfRows) local sute = {} for r = 1, numOfRows do sute[r] = {} end return sute end local dim = #funcs local w = {} local f = {{},{},…