IGOR Proで曲線下面積を計算
areaXYを使うみたい。
以下、例。cursorの使い方、忘れてた orz
// make data set make/o/n=101 xdata=pi/100*x make/o/n=101 ydata=sin(pi/100*x) // plot graph display ydata vs xdata // calculate auc // print areaxy(xdata, ydata) string/g area1=num2str(areaxy(xdata, ydata)) // calculate auc with cursor // // vcsr : return Y value of cursor // hcsr : return X value of cursor // xcsr : return point number of cursor // // rightx : return start point number of wave ? // leftx : return last point number of wave ? cursor a ydata, 0 cursor b ydata, numpnts(ydata)/2 // print areaxy(xdata, ydata, hcsr(a), hcsr(b)) string/g area2=num2str(areaxy(xdata, ydata, hcsr(a), hcsr(b))) // display result doalert 0, "area under curve \r\r"+"0 - Pi : " + area1 + "\r" + "0 - Pi/2 : " + area2