# Estimate weather conditions during blooming season using the example
# datasets included in the package
library(magrittr)
library(dplyr)
library(lubridate)
Bloom_BT <- Dates_BT %>%
select(Year, sbloom, ebloom) %>%
filter(Dates_BT$Year<=2002)
Weather <- Tudela_DW %>%
filter (Tudela_DW$Year<=2002)
Pol_weather_BT <- pollination_weather(Weather,Bloom_BT,42.13132)
Run the code above in your browser using DataLab