RegularPriceTier/Channel0UnitSalesBlack MesaApertureTyrell CorpRekallMomCorpLexCorpStark IndWayne Ent

  1. ### example 5 vertical stack grouped bar
  2. d1 <- dPlot(
  3. x = c("PriceTier","Channel"),
  4. y = "UnitSales",
  5. groups = "Owner",
  6. data = data,
  7. type = "bar"
  8. )
  9. d1$legend(
  10. x = 200,
  11. y = 10,
  12. width = 400,
  13. height = 20,
  14. horizontalAlign = "right"
  15. )
  16. d1