Rで行と行の計算を行う