Skip to content

Commit

Permalink
recode: reduce the size of OutputModels (Part 1) (#683)
Browse files Browse the repository at this point in the history
* recode: getting rid of some columns in OutputModels

Co-authored-by: michellegrushkometa <michellegrushko@meta.com>
  • Loading branch information
laresbernardo and michellegrushkometa committed Apr 13, 2023
1 parent 4f3289d commit bce870e
Showing 1 changed file with 3 additions and 5 deletions.
8 changes: 3 additions & 5 deletions R/R/model.R
Original file line number Diff line number Diff line change
Expand Up @@ -827,16 +827,14 @@ robyn_mmm <- function(InputCollect,
mape = mape,
lambda = lambda_scaled,
lambda_hp = lambda_hp,
lambda_max = lambda_max,
lambda_min_ratio = lambda_min_ratio,
solID = paste(trial, lng, i, sep = "_"),
trial = trial,
iterNG = lng,
iterPar = i,
df.int = df.int
iterPar = i
)

total_common <- ncol(common)
split_common <- which(colnames(common) == "lambda_min_ratio")
split_common <- which(colnames(common) == "lambda_hp")

resultCollect[["resultHypParam"]] <- as_tibble(hypParamSam) %>%
select(-.data$lambda) %>%
Expand Down

0 comments on commit bce870e

Please sign in to comment.