#' winddir
#'
#' @description Calculate meteorological wind direction from cartesian components u and v.
#'
#' @param u numeric U zonal component
#' @param v numeric V meridian component
#'
#' @references
#' Istituto di Biometeorologia Firenze Italy
#' @author Alfonso crisci \email{a.crisci@@ibimet.cnr.it} Marco Morabito \email{m.morabito@@unifi.it}
#' @keywords Meteorological Wind direction
#'
#'
#' @export
winddir <- function(u, v) {
(180 / pi) * atan(u/v) + ifelse(v>0,180,ifelse(u>0,360,0))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.