Master (#7)

* before upfgrade to 1.11.0

* api 1.11.0

* export data

* smalll

* guid and pbix

* small

* comments clean in R

* update to 1.0.3

small bug resolved

README.md

@@ -23,7 +23,7 @@ Here is how it works:
 
 
 R package dependencies (which are auto-installed): scales, reshape, ggplot2, plotly,  htmlwidgets, XML
-Supports R versions: R 3.4.0, R 3.3.3, R 3.3.2, MRO 3.2.2 
+Supports R versions: R 3.5.x, R 3.4.x 
 
 This is an open source visual. Get the code from GitHub: https://github.com/Microsoft/powerbi-visuals-funnel
 

assets/Funnel_LongDescription.txt

@@ -15,6 +15,6 @@ Here is how it works:
 
 
 R package dependencies (which are auto-installed): scales, reshape, ggplot2, plotly,  htmlwidgets, XML
-Supports R versions: R 3.4.x, R 3.3.3, R 3.3.2, MRO 3.2.2 
+Supports R versions: R 3.5.x, R 3.4.x 
 
 This is an open source visual. Get the code from GitHub: https://github.com/Microsoft/powerbi-visuals-funnel

package.json

@@ -1,6 +1,6 @@
 {
   "name": "powerbi-visuals-funnel-plot",
-  "version": "1.0.1",
+  "version": "1.0.3",
   "scripts": {
     "postinstall": "pbiviz update 1.11.0",
     "pbiviz": "pbiviz",

pbiviz.json

@@ -4,7 +4,7 @@
     "displayName": "Funnel plot",
     "guid": "RHTML_FUNNEL_978302916642",
     "visualClassName": "Visual",
-    "version": "1.0.1",
+    "version": "1.0.3",
     "description": "Find outliers in your data, using a funnel plot",
     "supportUrl": "https://aka.ms/customvisualscommunity",
     "gitHubUrl": "https://github.com/Microsoft/powerbi-visuals-funnel"

script.r

@@ -342,7 +342,7 @@ if(validToPlot)
     entryWordLabelY = "Percentage of "
   }
   
-  number.seq <- seq(min(countValue), max(countValue), 1000)
+  number.seq <- seq(from = min(countValue), to = max(countValue), length.out= 1000)
   number.llconf1 <- (p.fem - zLow * sqrt((p.fem*(1-p.fem)) / (number.seq)))*mult
   number.ulconf1 <- (p.fem + zLow * sqrt((p.fem*(1-p.fem)) / (number.seq)))*mult
   number.llconf2 <- (p.fem - zUp * sqrt((p.fem*(1-p.fem)) / (number.seq)))*mult