Forum Discussion

Anonymous's avatar
Anonymous
Not applicable
6 years ago

Using power bi slicers to filter data on Power BI Custom Visuals using R Plotly

Hi! I have manage to create a line chart and scatter plot rhtml visual. The line chart and scatter plots are from two different tables and they both are unrelated to other tables in my data model. I...
Need Help
v-lionel-msft's avatar
v-lionel-msft
Icon for Community Support rankCommunity Support
6 years ago

Hi Anonymous ,

 

Could it be a problem with the data model, would you mind sharing your .pbix file?

 

Best regards,
Lionel Chen

If this post helps, then please consider Accept it as the solution to help the other members find it more quickly.

Anonymous's avatar
Anonymous
Not applicable
6 years ago

https://drive.google.com/file/d/1zu8XSnaTtVL27dag5SGr0M8wiJJ4Ws5w/view?usp=sharing 

 

Hi again!

 

Here I have put together a power bi desktop file. In this file you will see the use of my custom visual and also a R visual that I have experienced with. The R script shows that I am able to filter on the slicers on the scatter plot dataset, but when I try to send in two dataset into my custom visual, it works when I use fields from the scatter plot dataset only, and not when I use related fields from other tables.

 

So it turns down to how can I send in two dataset (x1,y1, x2,y2) both with their filter selections into my Power BI custom visual. dataset 1 which includes x1,y1 and line chart slicer (a disconnected filter) and dataset 2 which includes x2,y2, project, location and perhaps other slicers.

 

In my R code it is therefore interesting what I can do this this code

 

    dataset = cbind(x1, y1, x2, y2, y2legends,Location, Project)
    namesDS = names(dataset)
    pal <- c("red", "blue", "green")
 
    data <- data.frame(x1, y1, x2, y2, y2legends, Location, Project)
  
# Can I adjust this code to separate so I have two datasets or frames before I send in the data variables into 
 
 fig <- plot_ly(data, x = ~x1, y = ~y1, name = 'Normal kurve', type = 'scatter', mode = 'lines')
    fig <- fig %>% add_trace( x = ~x2, y = ~y2, name = ~y2legends, mode = 'markers', color = ~y2legends, colors = pal, text = ~Location,
            hovertemplate = paste(
        "<b>%{text}</b><br><br>",
        "Average weight: %{x}<br>",
        "%{yaxis.title.text}: %{y:.2f}<br>",
        "<extra></extra>"
        )
        )