fix: codefactor https://www.codefactor.io/repository/github/laresbern…

…ardo/lares/pull/57 2
laresbernardo · Dec 5, 2024 · a272dcc · a272dcc
1 parent 5dd5df5
commit a272dcc
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/crossbrand2.R b/R/crossbrand2.R
@@ -392,8 +392,7 @@ fx_gradient <- function(x, coeff, alpha, inflexion, x_hist_carryover) {
 
 fx_objective.chanel <- function(x, coeff, alpha, inflexion, x_hist_carryover) {
   xAdstocked <- x + mean(x_hist_carryover)
-  xOut <- -coeff * sum((1 + inflexion**alpha / xAdstocked**alpha)**-1)
-  return(xOut)
+  -coeff * sum((1 + inflexion**alpha / xAdstocked**alpha)**-1)
 }
 
 eval_g_eq <- function(X, target_value) {