Habitat_confirmations spreadsheet #65
Conversation
…f data that needs to be added by hand.
There was a problem hiding this comment.
fyi - the UTM method in the skeena 2022 repo was incorrect. peace 2022 however was correct. Our method is most commonly GPS General. GIS is when you derive the points in something like Q. although we do that sometimes (ex. move points) - it is almost always based on our GPS unit points and tracks
There was a problem hiding this comment.
okay. Let me know if you want me to correct UTM method or if you will do that in next PR?
| @@ -755,6 +756,9 @@ plot_fish_hist | |||
|
|
|||
|
|
|||
| ####-----------summary tables for input to spreadsheet---------------------- | |||
| dir_gis <- 'sern_skeena_2023' | |||
| @@ -793,17 +795,53 @@ hab_fish_input <- left_join( | |||
| # a hack to get number of columns right | |||
| fish_activity = age, | |||
| comments) %>% | |||
| mutate(model = case_when(local_name %like% 'ef' ~ 'halltech HT2000'), | |||
There was a problem hiding this comment.
there are tons of old examples of using data.table %like% and %ilike% but we should strive to get away from it to reduce dependencies by using tidyverse equivalents. NewGraphEnvironment/fpr#72 discusses this for fpr and we commonly use stringr::str_detect elsewhere. keen to ditch data.table one day. tidyverse is mostly catching and surpassing it for most things. there are other places it was necessary in the past (see creation of watershed summary stats) so not sure if we will get all the way there this spring
| hab_fish_input %>% | ||
| readr::write_csv(file = paste0(getwd(), '/data/inputs_extracted/hab_con_fish_summary.csv'), | ||
| readr::write_csv(file = paste0('data/inputs_extracted/hab_con_fish_summary.csv'), |
There was a problem hiding this comment.
no need for paste0 once we ditch getwd
|
Thank you! |
inputs_extracted.Rnow updates sheet 2 ofhabitat_confirmations.xlswith all data except some data which was still added by hand.habitat_confirmations.xls#64 (comment)habitat_confirmations.xls#64 (comment).