PolariSの性能評価に用いたRのプログラム