r script execution