CODEWITHSUNDEEP
rformattingpie-chartplotly
alsarria
alsarria

Reputation: 59

How to change format values in a Pie Chart made by plotly (in R)

First of all thank you for spending a little bit of your time helping me to solve this issue.

I am getting started in plot_ly through R and I am struggling when trying to change the format of the values of my Pie Chart (I want them to be showed in the plot as currency "$" format).

So far my code looks like:

data <- data.frame(Level = c("Receipt","Disbursement"),Amount = c(1000,2000))

name_dataset <- "Overview"

plot_ly(data=data, labels = Level, values = Amount, type = "pie", textinfo= "label+percent", 
        hoverinfo = "label+percent+value", outsidetextfont = list(color = "white")) %>% layout(title = paste0(paste(unlist(strsplit(name_dataset,"_")),collapse = " ")))

Thank you for your help!

Upvotes: 0

Views: 3734

Answers (2)

Veeru Sajjan
Veeru Sajjan

Reputation: 26

    var text = [15588, 16787, 27778].map(function (v, i) {
      return currencyFormatterForUI(v) //format here
    });

    var chartObj = {
        header: 'New Backlog',
        description: 'Total Value of Recently Added (Last 30 Days) Backlog by Issue Type',
        type: 'chart',
        id: 'div4',
        layout: {
          margin: {
            autoexpand: true,
            r: 25,
            t: 20,
            b: 20,
            l: 25
          },
          legend: {
            'orientation': 'h',
            xanchor: 'center',
            yanchor: 'top',
            y: -0.1, // play with it
            x: 0.5 // play with it
          },
        },
        data: [{
          values: [15588, 16787, 27778],
          labels: ['Bug', 'Improvement', 'Story'],
          text: text,
          type: 'pie',
          textinfo: 'label+text',
          hoverinfo: 'label+text+percent'
        }],
      };
      
      var myPlot = document.getElementById('div4');
      Plotly.plot(myPlot, chartObj);

      function currencyFormatterForUI(value) {
        const formatter = new Intl.NumberFormat('en-US', {
          style: 'currency',
          currency: 'USD',
          minimumFractionDigits: 0,
          maximumFractionDigits: 0
        });
        return formatter.format(value || 0);
      }
    <script src="https://cdn.plot.ly/plotly-latest.min.js"></script>
    <div id="div4"></div>

Upvotes: 1

MLavoie
MLavoie

Reputation: 9836

Are you looking for something like this:

data$AmountB <- prettyNum(data$Amount, big.mark=",",scientific=FALSE) #EDIT
data$AmountB <- paste(data$AmountB, "$", sep="")
plot_ly(data=data, labels = Level, values = Amount, type = "pie", textinfo= "text", text=AmountB,hoverinfo = "text", outsidetextfont = list(color = "white")) %>% 
layout(title = paste0(paste(unlist(strsplit(name_dataset,"_")),collapse = " ")))

enter image description here

Upvotes: 4

Related Questions