• 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óncc26971bf365f62cd9c8d653569b062b971be431 (tree)
Tiempo2022-11-11 00:58:32
AutorLorenzo Isella <lorenzo.isella@gmai...>
CommiterLorenzo Isella

Log Message

I send "" and "0" to NA and I now treat the case of a single lower bound for the interval.

Cambiar Resumen

Diferencia incremental

diff -r 6dccf62f34a0 -r cc26971bf365 R-codes/create_tam_parquet.R
--- a/R-codes/create_tam_parquet.R Tue Nov 08 17:38:01 2022 +0100
+++ b/R-codes/create_tam_parquet.R Thu Nov 10 16:58:32 2022 +0100
@@ -108,11 +108,11 @@
108108 mutate(across(contains("bound") , ~ ifelse(.x == "",
109109 NA_character_, .x))) |>
110110 mutate(across(contains("bound"), ~as.numeric(.x))) |>
111- mutate(estimated_value=(lower_bound+upper_bound)/2.) |>
111+ mutate(estimated_value=if_else(!is.na(upper_bound),(lower_bound+upper_bound)/2., lower_bound) ) |>
112112
113113 ## only if you want to remove all the zeros
114114
115- ## mutate(across(where(is.numeric), ~if_else(.x==0, NA_real_, .x))) |>
115+ mutate(across(where(is.numeric), ~if_else(.x==0, NA_real_, .x))) |>
116116 select(-c(lower_bound, upper_bound)) |>
117117
118118 mutate(granted_value_extended_eur = case_when(