結果 : translate code from python to r