Improve helper function to put ocpu_wrapper data in r argument