how to create a stored procedure for SQL for the function CP and CPK using external script 'R' where it displays and error.

EXEC   sp_execute_external_script
      @language = N'R'
     ,@script = N'x <-  rweibull(30, 2, 8) +100;
cp(x, "weibull", lsl = 100, usl = 117)
OutputDataSet <- as.data.frame(x);'
     , @input_data_1 = N' ';

***********************************

Msg 39004, Level 16, State 20, Line 0
A 'R' script error occurred during execution of 'sp_execute_external_script' with HRESULT 0x80004004.