my_circo {pcutils}

My circo plot

Description

My circo plot

Usage

my_circo(
  df,
  reorder = TRUE,
  pal = NULL,
  mode = c("circlize", "chorddiag")[1],
  legend = TRUE,
  ...
)

Arguments

df

dataframe with three column

reorder

reorder by number?

pal

a vector of colors, you can get from here too: RColorBrewer::brewer.pal(5,"Set2") or ggsci::pal_aaas()(5)

mode

"circlize","chorddiag"

legend

plot legend?

...

chordDiagram

Value

chordDiagram

Examples

if (requireNamespace("circlize")) {
  data.frame(
    a = c("a", "a", "b", "b", "c"),
    b = c("a", LETTERS[2:5]), c = 1:5
  ) %>% my_circo(mode = "circlize")
  data(otutab)
  cbind(taxonomy, num = rowSums(otutab))[1:10, c(2, 6, 8)] -> test
  my_circo(test)
}