もしかすると ifError のところと最後のところの戻り値は Optional<R> にすべきだったり？