p.col_wl {metools}

Bar plot with legend

Description

p.col_wl make a bar plot with legend.

Usage

p.col_wl(
  data,
  xaxis,
  yaxis,
  ybreaks = 10,
  percent = FALSE,
  yaccuracy = 0.01,
  ydecimalmark = ".",
  title = "title",
  xlab = "X axis",
  ylab = "Y axis",
  stitle = NULL,
  note = NULL,
  ctitles = "black",
  cscales = ctitles,
  cbgrid = "white",
  clgrid = cbgrid,
  cplot = "white",
  cbserie = "black",
  cticks = "black",
  lwdserie = 1,
  legtitle = "Legend",
  legsize = 8,
  cleg = ctitles,
  legheight = 0.5,
  pnote = 1,
  cbord = cplot,
  titlesize = 20,
  wordssize = 12,
  snote = 11,
  legpos = "right",
  legdir = "horizontal",
  legcol = "white",
  legspa = 1,
  legvjust = 0.5,
  colors = grDevices::rainbow(length(xaxis), v = 0.7)
)

Arguments

data

a dataframe

xaxis

x axis data

yaxis

y axis data

ybreaks

number of y axis breaks (default=10)

percent

If TRUE y axis in percent (default=F)

yaccuracy

a round for y axis (default=0.01)

ydecimalmark

y decimal mark (default=".")

title

title of plot

xlab

x axis label

ylab

y axis label

stitle

subtitle

note

note

ctitles

color of titles (title,xlab,ylab)

cscales

color of the scales (default= same ctitles)

cbgrid

color of grid background

clgrid

color of grid lines

cplot

color of plot background

cbserie

color of serie border (default= same cserie)

cticks

color of axis ticks

lwdserie

size of serie

legtitle

title of legend box

legsize

size of legend

cleg

color of legend words

legheight

height of legend box

pnote

position of note (default=1) (only numbers)

cbord

color of plot border (default= same cplot)

titlesize

size of title (default=20) (only numbers)

wordssize

size of words (default=12) (only numbers)

snote

size of note (default=11) (only numbers)

legpos

legend position

legdir

legend direction

legcol

color of legend box

legspa

spacement in legend box

legvjust

vertical adjust in legend box

colors

colors of bars, need same number of correspondencies.

Value

Return a dataframe with transformed columns.

Examples

v=data.frame("x"=1:5,"y"=c(10,4,8,5,2))
p.col_wl(v,xaxis= v$x,yaxis=v$y)

p.col_wl(v,xaxis= v$x,yaxis=v$y,colors=c('red','blue','green','grey','yellow'))