Dimple dPlot color x-axis bar values in R

Question

I'm attempting to set manual colors for Dimple dPlot line values and having some trouble.

d1 <- dPlot(
   x="Date", 
   y="Count",
   groups = "Category",
   data = AB_DateCategory,
   type = 'line'
  )

d1$xAxis(orderRule = "Date")
d1$yAxis(type = "addMeasureAxis")
d1$xAxis(
     type = "addTimeAxis",
     inputFormat = "%Y-%m-%d",
     outputFormat = "%Y-%m-%d",
     )

The plot comes out looking great, but I would like to manually set the "Category" colors. Right now, it's set to the defaults and I cannot seem to find a method of manually setting a scale.

I have been able to set the defaults using brewer.pal, but I want to match other colors in my report:

d1$defaultColors(brewer.pal(n=4,"Accent"))

Ideally, these are my four colors - the category values I'm grouping on are R, D, O and U.

("#377EB8", "#4DAF4A", "#E41A1C", "#984EA3"))

Answer 1

If I understand correctly, you want to make sure R is #377EB8, etc. To match R, D, O, U consistently to the colors especially across multiple charts, you will need to do something like this.

d1$defaultColors = "#!d3.scale.ordinal().range(['#377EB8', '#4DAF4A', '#E41A1C', '#984EA3']).domain(['R','D','O','U'])!#"

This is on my list of things to make easier.

Let me know if this doesn't work.

Answer 2

The issue with the accepted answer above is that defining an ordinal scale will not guarantee that specific colors are bound to specific categories R, D, O and U. The color mapping will change depending on the input data. To assign each color specifically you can use assignColor like this

d1$setTemplate(afterScript = '<script>
myChart.assignColor("R","#377EB8");
myChart.draw();
</script>')