Merge pull request #77 from trias-project/73_climate_matching_function

73 climate matching function

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: trias
 Title: Process Data for the Project Tracking Invasive Alien Species
  (TrIAS)
-Version: 1.5.1
+Version: 1.6.0
 Authors@R: 
  c(person(given = "Damiano",
  family = "Oldoni",
@@ -41,19 +41,25 @@ Imports:
  ggplot2,
  gratia,
  lazyeval,
+ leaflet,
  magrittr,
  mgcv,
  plotly,
  purrr,
+ raster,
  readr,
  reshape2,
  rgbif (>= 3.0),
  rlang,
+ rworldmap,
  scales,
+ sp,
  stringr,
+ svDialogs,
  tibble,
  tidyr,
- tidyselect
+ tidyselect,
+ methods
 Suggests:
  covr,
  knitr,
@@ -62,5 +68,6 @@ VignetteBuilder:
  knitr
 Encoding: UTF-8
 LazyData: true
+LazyDataCompression: bzip2
 Roxygen: list(markdown = TRUE)
 RoxygenNote: 7.1.2

NAMESPACE

@@ -2,9 +2,11 @@
 
 export(apply_decision_rules)
 export(apply_gam)
+export(climate_match)
 export(gbif_get_taxa)
 export(gbif_has_distribution)
 export(gbif_verify_keys)
+export(get_cred)
 export(get_table_pathways)
 export(indicator_introduction_year)
 export(indicator_native_range_year)
@@ -21,6 +23,7 @@ importFrom(assertthat,assert_that)
 importFrom(assertthat,is.date)
 importFrom(dplyr,"%>%")
 importFrom(dplyr,.data)
+importFrom(dplyr,add_row)
 importFrom(dplyr,add_tally)
 importFrom(dplyr,all_vars)
 importFrom(dplyr,anti_join)
@@ -42,7 +45,6 @@ importFrom(dplyr,full_join)
 importFrom(dplyr,group_by)
 importFrom(dplyr,if_else)
 importFrom(dplyr,inner_join)
-importFrom(dplyr,intersect)
 importFrom(dplyr,left_join)
 importFrom(dplyr,mutate)
 importFrom(dplyr,mutate_all)
@@ -86,14 +88,24 @@ importFrom(ggplot2,xlab)
 importFrom(ggplot2,ylab)
 importFrom(ggplot2,ylim)
 importFrom(grDevices,grey)
+importFrom(graphics,legend)
 importFrom(gratia,derivatives)
 importFrom(lazyeval,interp)
+importFrom(leaflet,addCircleMarkers)
+importFrom(leaflet,addLayersControl)
+importFrom(leaflet,addLegend)
+importFrom(leaflet,addPolygons)
+importFrom(leaflet,colorBin)
+importFrom(leaflet,colorNumeric)
+importFrom(leaflet,leaflet)
+importFrom(methods,as)
 importFrom(mgcv,gam)
 importFrom(mgcv,nb)
 importFrom(mgcv,summary.gam)
 importFrom(plotly,ggplotly)
 importFrom(plotly,layout)
 importFrom(purrr,cross_df)
+importFrom(purrr,list_along)
 importFrom(purrr,map)
 importFrom(purrr,map2)
 importFrom(purrr,map2_chr)
@@ -102,27 +114,45 @@ importFrom(purrr,map_df)
 importFrom(purrr,map_dfr)
 importFrom(purrr,pmap_dfr)
 importFrom(purrr,reduce)
+importFrom(raster,intersect)
+importFrom(readr,col_character)
+importFrom(readr,col_number)
 importFrom(readr,read_tsv)
 importFrom(readr,write_tsv)
 importFrom(reshape2,melt)
 importFrom(rgbif,name_lookup)
 importFrom(rgbif,name_usage)
+importFrom(rgbif,occ_download)
+importFrom(rgbif,occ_download_get)
+importFrom(rgbif,occ_download_import)
 importFrom(rgbif,occ_download_meta)
+importFrom(rgbif,pred)
+importFrom(rgbif,pred_in)
 importFrom(rlang,"!!!")
 importFrom(rlang,"!!")
 importFrom(rlang,":=")
 importFrom(rlang,.data)
+importFrom(rlang,is_empty)
 importFrom(rlang,sym)
+importFrom(rworldmap,getMap)
 importFrom(scales,percent_format)
+importFrom(sp,CRS)
+importFrom(sp,SpatialPointsDataFrame)
+importFrom(sp,merge)
+importFrom(sp,over)
+importFrom(sp,rbind.SpatialPolygonsDataFrame)
+importFrom(sp,spTransform)
 importFrom(stats,formula)
 importFrom(stats,median)
 importFrom(stats,predict)
+importFrom(stats,setNames)
 importFrom(stringr,str_c)
 importFrom(stringr,str_ends)
 importFrom(stringr,str_remove)
 importFrom(stringr,str_split)
 importFrom(stringr,str_sub)
 importFrom(stringr,str_to_lower)
+importFrom(svDialogs,dlgInput)
 importFrom(tibble,as_tibble)
 importFrom(tibble,tibble)
 importFrom(tidyr,gather)
@@ -131,3 +161,4 @@ importFrom(tidyselect,all_of)
 importFrom(tidyselect,ends_with)
 importFrom(tidyselect,one_of)
 importFrom(tidyselect,vars_pull)
+importFrom(utils,menu)