• R/O
  • SSH

Commit

Tags
No Tags

Frequently used words (click to add to your profile)

javac++androidlinuxc#windowsobjective-cqtcocoa誰得pythonphprubygameguibathyscaphec翻訳計画中(planning stage)omegatframeworktwittertestdomvb.netdirectxbtronarduinopreviewerゲームエンジン

Commit MetaInfo

Revisión77d878eb17b29138da03f652fa7eaf14d8951ea4 (tree)
Tiempo2022-11-24 06:43:32
AutorLorenzo Isella <lorenzo.isella@gmai...>
CommiterLorenzo Isella

Log Message

I simply changed a bit a function and moved one line.

Cambiar Resumen

Diferencia incremental

diff -r c62d3ddc8700 -r 77d878eb17b2 R-codes/arima_simple1_parallel.R
--- a/R-codes/arima_simple1_parallel.R Wed Nov 23 20:08:53 2022 +0100
+++ b/R-codes/arima_simple1_parallel.R Wed Nov 23 22:43:32 2022 +0100
@@ -14,17 +14,16 @@
1414 tidymodels_prefer()
1515
1616
17+source("/home/lorenzo/myprojects-hg/R-codes/stat_lib.R")
1718
1819
19-
20-
21-extract_ms_data <- function( ms){
20+extract_ms_data <- function( ms, log_trans){
2221
2322 res <- price_series |>
2423 filter(geo==ms)|>
2524 select(-geo)
2625
27- if (choose_log==1){
26+ if (log_trans==1){
2827 res <- res|>
2928 mutate(value=log(value))
3029
@@ -64,9 +63,6 @@
6463
6564 plan(multisession, workers = 4)
6665
67-source("/home/lorenzo/myprojects-hg/R-codes/stat_lib.R")
68-
69-
7066 choose_log <- 1
7167
7268
@@ -85,7 +81,7 @@
8581
8682 ## ms_list <- c("DE", "AT", "FI")
8783
88-ms_data <- future_map(ms_list, extract_ms_data )
84+ms_data <- future_map2(ms_list,choose_log, extract_ms_data )
8985
9086
9187 splits_parallel <- future_map( ms_data,