sankey image was not created by R script

[Anonymous]

hi team,

i need your help. i have below R script run in PowerBI and want to create a sankey chart in visualize in PowerBI.

# The following code to create a dataframe and remove duplicated rows is always executed and acts as a preamble for your script: 

# dataset <- data.frame(source, target, value)
# dataset <- unique(dataset)

# Paste or type your script code here:
library(networkD3)
node_names <- unique(c(dataset$source, dataset$targe))
nodes <- data.frame(name=node_names)
links <- data.frame(source = match(dataset$source, node_names) - 1,
                    target = match(dataset$target, node_names) - 1,
                    value = dataset$value)
sankeyNetwork(Links = links, Nodes = nodes, 
              Source = "source",
              Target = "target",
              Value = "value")​

But i got 'No image was created'. how to resolve it to let the sankey chart displayed in PowerBI.

[ebeery]

@Anonymous I believe this falls under the below limitation from the Power BI R Visuals documentation.

It seems as if the sankeyNetwork function in networkD3 does not send its results to the "Plot" device.  

See also this GitHub issue:

https://github.com/MicrosoftDocs/powerbi-docs/issues/266 

[Anonymous]

what does it mean 'only plot to default device'?

[ebeery]

@Anonymous also probably worth asking - is there a reason you cannot use the Sankey Chart custom visual on AppSource?

[Anonymous]

becuase the nodes are too many to show correctly in powerBI->snakey chart.

[ebeery]

@Anonymous this is above my level of R expertise, but I from what I can gather networkD3 is not actually generating an R "plot" - it's generating an html widget that is displayed.  That is why when viewing in R Studio, it shows up under "Viewer" instead of under "Plots", and also probably what enables these graphics to be interactive.

More info can be found here:

https://bookdown.org/rdpeng/exdata/graphics-devices.html