R/pie.R

#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,...) {
#}


  
metno/esd documentation built on April 24, 2024, 9:19 p.m.