R/pie.R

In metno/esd.test: Climate analysis and empirical-statistical downscaling (ESD) package for monthly and daily data.

piegraph <-  function(x,...)
  UseMethod("graph")

piegraph.default <- function(x,...)
  pie(x, labels = names(x), edges = 200, radius = 0.8,
      clockwise = FALSE, init.angle = if(clockwise) 90 else 0,
      density = NULL, angle = 45, col = NULL, border = NULL,
      lty = NULL, main = NULL, ...)

piegraph.station <- function(x,...) {
}

piegraph.dsensemble <- function(x,...) {
}