knitr::opts_chunk$set(echo = TRUE) source("f_coord_date_weather.r") # rmarkdown::render("get_weather.rmd",output_file="get_weather")
source("f_coord_date_weather.r") library(data.table) library(dplyr)
default value of parameters: * firstYear = 1950 * lastYear = last available year * repout = data
nc2rdata()
precipitation)
default value of parameters:
* firstYear = 1950 * lastYear = last available year * repout = data
assess_weather_ref()
d <- gen_import_fread() dsample <- unique(d[,c("date_format","longitude","latitude")]) dsite <- unique(d[,c("longitude","latitude")]) dsite$site_id <- 1:nrow(dsite) dsample <- data.table(inner_join(dsample,dsite))
get_sample_weather()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.