軽量ミニマックス近似式 4 / 或る函数 ε(x) が極値となるところの x を見つける / Wolfram

参考: Interface(インターフェース) 2017年 09 月号, pp.109-111
 
ε(x) の導函数 ε'(x) を求めて方程式 ε'(x) = 0 を x について解けばよい。
 
函数 f(x) とその近似式 g(x) との差を ε(x) とする。
f(x) = sin(pi * x / 2)
g(x) = 0.07293465 * x^5 - 0.64345777 * x^3 + 1.570657356 * x^1
ε(x) = f(x) - g(x)
f:id:ti-nspire:20180222170209p:plain:w600
NSolve[] で Reals を指定すれば 6 点が全部求まる。