R test script

Rのテストスクリプトファイルを追加してみる。