knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

library(tidyverse)
library(agroenv)

Get information on climate stations or grid cells around a given geographical location

location <- data.frame(lat=43.5279, lon=1.5009)

get_station(location$lat, location$lon, network="meteofrance", n=1)

get_station(location$lat, location$lon, network="safran", n=1)

Get climate data in the same format from various sources

location <- data.frame(lat=43.5279, lon=1.5009)

get_climate_nasapower(lat=location$lat, lon=location$lon, year=2003)
location <- data.frame(lat=43.5279, lon=1.5009)

path_safran <- "~/Documents/INRA/Database/db_safran"

get_climate_safran(lat=location$lat, lon=location$lon, year=2003, path=path_safran)

Get soil data

path_esdb <- "~/Documents/INRA/Database/db_esdb"

location <- data.frame(lat=43.5279, lon=1.5009)

load(paste0(path_esdb, "/data_soil.rda"))

get_soil_esdb(lat=location$lat, lon=location$lon, data=data_soil)

# get_param_soil(lat=location$lat, lon=location$lon, data=data_soil)


picasa/agroenv documentation built on Nov. 17, 2022, 3:05 a.m.