Commit ee38d5a8 authored by luroth's avatar luroth
Browse files

missing simulation run added

parent 138a6e0d
...@@ -5,4 +5,3 @@ ...@@ -5,4 +5,3 @@
/htfp_wheat_canopy_height_processing.Rproj /htfp_wheat_canopy_height_processing.Rproj
/.idea /.idea
/.RDataTmp /.RDataTmp
/Simulation/Runs/
...@@ -84,7 +84,7 @@ df_values_for_fit <- df_values_for_fit %>% ...@@ -84,7 +84,7 @@ df_values_for_fit <- df_values_for_fit %>%
mutate(lag_timestamp = lag(timestamp), value_delta = value - lag(value)) mutate(lag_timestamp = lag(timestamp), value_delta = value - lag(value))
# Remove first measurements, they do not suite as delta measurement # Remove first measurements, they do not suite as delta measurement
df_values_for_fit <- df_values_for_fit %>% filter(!is.na(lag_timestamp)) df_values_for_fit <- df_values_for_fit %>% filter(!is.na(lag_timestamp))
# Calcualte growth rate # Calculate measurement time point shifts in hours
df_values_for_fit <- df_values_for_fit %>% df_values_for_fit <- df_values_for_fit %>%
group_by(plot.UID) %>% group_by(plot.UID) %>%
mutate(time_diff = difftime(timestamp, lag_timestamp, units = "hours")) mutate(time_diff = difftime(timestamp, lag_timestamp, units = "hours"))
......
This source diff could not be displayed because it is too large. You can view the blob instead.
This diff is collapsed.
This diff is collapsed.
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment