r4sを実装