minor fixes R doc legend and pie charts

Author: abgunth

_posts/r/2015-07-30-legend.Rmd

@@ -244,7 +244,7 @@ library(plyr)
 data <- spread(Orange, Tree, circumference)
 data <- rename(data, c("1" = "Tree1", "2" = "Tree2", "3" = "Tree3", "4" = "Tree4", "5" = "Tree5"))
 
-p <- pplot_ly(data, x = ~age, y = ~Tree1, type = 'scatter', mode = 'lines', 
+p <- plot_ly(data, x = ~age, y = ~Tree1, type = 'scatter', mode = 'lines', 
         legendgroup = 'group1', name = 'Zone 1 - Tree 1') %>%
   add_trace(y = ~Tree2, legendgroup = 'group2', name = 'Zone 2 - Tree 1') %>%
   add_trace(y = ~Tree3, legendgroup = 'group1', name = 'Zone 1 - Tree 2') %>%

_posts/r/2015-07-30-legend.md

@@ -239,19 +239,13 @@ library(plyr)
 data <- spread(Orange, Tree, circumference)
 data <- rename(data, c("1" = "Tree1", "2" = "Tree2", "3" = "Tree3", "4" = "Tree4", "5" = "Tree5"))
 
-p <- pplot_ly(data, x = ~age, y = ~Tree1, type = 'scatter', mode = 'lines', 
+p <- plot_ly(data, x = ~age, y = ~Tree1, type = 'scatter', mode = 'lines', 
         legendgroup = 'group1', name = 'Zone 1 - Tree 1') %>%
   add_trace(y = ~Tree2, legendgroup = 'group2', name = 'Zone 2 - Tree 1') %>%
   add_trace(y = ~Tree3, legendgroup = 'group1', name = 'Zone 1 - Tree 2') %>%
   add_trace(y = ~Tree4, legendgroup = 'group2', name = 'Zone 2 - Tree 2') %>%
   add_trace(y = ~Tree5, legendgroup = 'group1', name = 'Zone 1 - Tree 3') 
-```
 
-```
-## Error in eval(expr, envir, enclos): impossible de trouver la fonction "pplot_ly"
-```
-
-```r
 # Create a shareable link to your chart
 # Set up API credentials: https://plot.ly/r/getting-started
 chart_link = plotly_POST(p, filename="legend/grouped")

_posts/r/2015-11-19-pie-charts.Rmd

@@ -62,7 +62,7 @@ chart_link
 
 ### Styled Pie Chart
 
-```{r}
+```{r, results = 'hide'}
 library(plotly)
 
 USPersonalExpenditure <- data.frame("Categorie" = rownames(USPersonalExpenditure), USPersonalExpenditure)

_posts/r/2015-11-19-pie-charts.md

@@ -93,8 +93,6 @@ chart_link
 
 <iframe src="https://plot.ly/~RPlotBot/3829.embed" width="800" height="600" id="igraph" scrolling="no" seamless="seamless" frameBorder="0"> </iframe>
 
-<iframe src="https://plot.ly/~RPlotBot/3829.embed" width="800" height="600" id="igraph" scrolling="no" seamless="seamless" frameBorder="0"> </iframe>
-
 ### Subplots