Merge pull request #110 from addelany/main

add project id path
eco4cast · Sep 27, 2024 · ae1bb2d · ae1bb2d
2 parents e9eb082 + 5a0fe5d
commit ae1bb2d
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/R/build_forecast_scores.R b/R/build_forecast_scores.R
@@ -39,11 +39,13 @@ build_forecast_scores <- function(table_schema,
 
   aws_asset_link <- paste0('"',"s3://anonymous@",
                            aws_download_path,
+                           "/project_id=", config$project_id,
                            #"/model_id=", model_id,
                            "?endpoint_override=",config$endpoint,'"')
 
   aws_href_link <- paste0("s3://anonymous@",
                            aws_download_path,
+                          "/project_id=", config$project_id,
                            #"/model_id=", model_id,
                            "?endpoint_override=",config$endpoint)
 

diff --git a/R/generate_model_assets.R b/R/generate_model_assets.R
@@ -38,7 +38,7 @@ generate_model_assets <- function(full_var_df, aws_path, model_code_link){
                       "?endpoint_override=",config$endpoint),
       'description' = paste0("Use `arrow` for remote access to the database. This R code will return results for this variable and model combination.\n\n### R\n\n```{r}\n# Use code below\n\nall_results <- arrow::open_dataset(",paste0('"',"s3://anonymous@",
                                                                                                                                                                                                                                           aws_path,
-                                                                                                                                                                                                                                          "project_id=", full_var_df$project_id[i],
+                                                                                                                                                                                                                                          "/project_id=", full_var_df$project_id[i],
                                                                                                                                                                                                                                           "/duration=", full_var_df$duration[i],
                                                                                                                                                                                                                                           "/variable=", full_var_df$variable[i],
                                                                                                                                                                                                                                           "/model_id=", m,