saving_path + lintr

NorskRegnesentral · Oct 21, 2024 · 6cfd829 · 6cfd829
1 parent 63f9c9f
commit 6cfd829
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 4 deletions.
diff --git a/R/cli.R b/R/cli.R
@@ -79,7 +79,7 @@ cli_startup <- function(internal, model_class, verbose) {
 #'
 #' @export
 #' @keywords internal
-cli_compute_vS <- function(internal){
+cli_compute_vS <- function(internal) {
 
   verbose <- internal$parameters$verbose
   approach <- internal$parameters$approach

diff --git a/R/compute_vS.R b/R/compute_vS.R
@@ -39,7 +39,7 @@ compute_vS <- function(internal, model, predict_model, method = "future") {
   }
 
   #### Adds v_S output above to any vS_list already computed ####
-  vS_list <- append_vS_list(vS_list,internal)
+  vS_list <- append_vS_list(vS_list, internal)
 
 
   return(vS_list)

diff --git a/python/shaprpy/explain.py b/python/shaprpy/explain.py
@@ -285,8 +285,8 @@ def explain(
     pred_explain = r2py(routput.rx2('pred_explain'))
     MSEv = recurse_r_tree(routput.rx2('MSEv'))
     iterative_results = recurse_r_tree(routput.rx2('iterative_results'))
-    saving_path = StrVector(routput.rx2['saving_path']) # NOt sure why this is not working
-    #saving_path = StrVector(rinternal.rx2['parameters'].rx2['output_args'].rx2['saving_path'])[0]
+    #saving_path = StrVector(routput.rx2['saving_path']) # NOt sure why this is not working
+    saving_path = StrVector(rinternal.rx2['parameters'].rx2['output_args'].rx2['saving_path'])[0]
     #internal = recurse_r_tree(routput.rx2('rinternal')) # Currently get an error with NULL elements here
 
     return shapley_values_est, shapley_values_sd, pred_explain, MSEv, iterative_results, saving_path, rinternal