diff --git a/myFirstRMarkdown.Rmd b/myFirstRMarkdown.Rmd index ec8bae18687cb737823a8973e24a0fefd0c22d38..a9c8bd6e862e30da4d01055978e88d14950af789 100644 --- a/myFirstRMarkdown.Rmd +++ b/myFirstRMarkdown.Rmd @@ -86,7 +86,7 @@ ggplot(plotDT, Now draw a plot of hydro as a % of all. -```{r, fig.cap="Plot hydro as a % of all generation by date and time period"} +```{r hydro as percent chart, fig.cap="Plot hydro as a % of all generation by date and time period"} # > hydro as a % of all ---- plotDT <- plotDT[, sumAllMW := sum(totalMW), keyby = .(Time_Period, rDate)] # calculate total plotDT <- plotDT[, pcTotalMW := 100*(totalMW/sumAllMW)] # calculate % diff --git a/myFirstRMarkdown.html b/myFirstRMarkdown.html index cc5a83fde23f93d222951430de66dc12fa913f3d..143dd46aa0c038f561bac7cbf914e86cb84876ee 100644 --- a/myFirstRMarkdown.html +++ b/myFirstRMarkdown.html @@ -218,7 +218,7 @@ div.tocify { <h1 class="title toc-ignore">myFirstRMarkdown</h1> <h4 class="author"><em>Ben Anderson (<a href="mailto:b.anderson@soton.ac.uk">b.anderson@soton.ac.uk</a> <code>@dataknut</code>)</em></h4> -<h4 class="date"><em>Last run at: 2018-03-29 14:44:06</em></h4> +<h4 class="date"><em>Last run at: 2018-03-29 14:45:15</em></h4> </div> @@ -410,7 +410,7 @@ ggplot(plotDT[Fuel_Code == "Hydro"], geom_line()</code></pre> <pre><code>## Warning: Removed 62 rows containing missing values (geom_path).</code></pre> <div class="figure"> -<img src="myFirstRMarkdown_files/figure-html/unnamed-chunk-1-1.png" alt="Plot hydro as a % of all generation by date and time period" /> +<img src="myFirstRMarkdown_files/figure-html/hydro%20as%20percent%20chart-1.png" alt="Plot hydro as a % of all generation by date and time period" /> <p class="caption">Plot hydro as a % of all generation by date and time period</p> </div> </div> diff --git a/myFirstRMarkdown.md b/myFirstRMarkdown.md index e2b7e722edd8179fb1f596f4cfc4107fcd6bbccb..3af4b9825214e2f3e4110ac1c3640596c25570ec 100644 --- a/myFirstRMarkdown.md +++ b/myFirstRMarkdown.md @@ -1,7 +1,7 @@ --- title: "myFirstRMarkdown" author: "Ben Anderson (b.anderson@soton.ac.uk `@dataknut`)" -date: 'Last run at: 2018-03-29 14:44:06' +date: 'Last run at: 2018-03-29 14:45:15' output: html_document: fig_caption: yes @@ -138,7 +138,7 @@ ggplot(plotDT[Fuel_Code == "Hydro"], ## Warning: Removed 62 rows containing missing values (geom_path). ``` - + # Discuss your results here diff --git a/myFirstRMarkdown_files/figure-html/hydro as percent chart-1.png b/myFirstRMarkdown_files/figure-html/hydro as percent chart-1.png new file mode 100644 index 0000000000000000000000000000000000000000..daffdaf4a8980c30ded78d7b7f1c6cc5e5caf332 Binary files /dev/null and b/myFirstRMarkdown_files/figure-html/hydro as percent chart-1.png differ