get metadata from bc data catolougue using bcdata. Column names, types and descriptions. Assumes `bcfishpass` virtenv is set up already

metadata_bcdata.R

reticulate::use_condaenv('bcfishpass') %>% 
  base::system2(paste0("sh ",getwd(), "/scripts/test.sh")) 


schema <- jsonlite::fromJSON('data/whse_fish.pscis_assessment_svw_metadata.json', flatten = T) %>% 
  purrr::pluck('schema') %>% 
  dplyr::mutate(column_name = stringr::str_to_lower(column_name))
  
  #within test.sh (unhash second line) is 
  #!/bin/bash
  # bcdata info WHSE_FISH.PSCIS_ASSESSMENT_SVW > data/whse_fish.pscis_assessment_svw_metadata.json