EnKFsample2.R : パラメータを推定する