diff --git a/.gitignore b/.gitignore index f7d9028..f10da22 100644 --- a/.gitignore +++ b/.gitignore @@ -17,4 +17,5 @@ catboost_info tp1_files tp2_files -tp3_files \ No newline at end of file +tp3_files +dashboard_files \ No newline at end of file diff --git a/M2/Data Visualisation/.gitignore b/M2/Data Visualisation/.gitignore deleted file mode 100644 index e69de29..0000000 diff --git a/M2/Data Visualisation/tp2/dashboard.Rmd b/M2/Data Visualisation/tp2/dashboard.Rmd new file mode 100644 index 0000000..bcec1f5 --- /dev/null +++ b/M2/Data Visualisation/tp2/dashboard.Rmd @@ -0,0 +1,40 @@ +--- +title: "Dashboard des accidents de vélo" +output: + flexdashboard::flex_dashboard: + orientation: columns + vertical_layout: fill +--- + +```{r setup, include = FALSE} +library(flexdashboard) +library(ggplot2) +library(gapminder) +library(rmarkdown) +``` + +## column {data-width="650"} + +### Graphique 1 + +```{r} +paged_table(gapminder, options = list(rows.print = 15)) +``` + +## column {data-width="350"} + +### Graphique 2 + +```{r} +ggplot(data = gapminder, aes(x = lifeExp)) + + geom_histogram(aes(y = ..density..), bins = 30) + + geom_density() +``` + +### Graphique 3 + +```{r} +ggplot(data = gapminder, aes(x = lifeExp)) + + geom_histogram(aes(y = ..density..), bins = 30) + + geom_density() +``` \ No newline at end of file diff --git a/M2/Data Visualisation/tp2/dashboard.html b/M2/Data Visualisation/tp2/dashboard.html new file mode 100644 index 0000000..478a8fc --- /dev/null +++ b/M2/Data Visualisation/tp2/dashboard.html @@ -0,0 +1,563 @@ + + + + + + + + + +Dashboard des accidents de vélo + + + + + + + + + + + + + + + + + + + + + + +
+ +
+ +
+
+

Dashboard des accidents de vélo

+
+ + + +
+ + + + +
+ + + +
+ + +
+

column

+
+

Graphique 1

+
+
paged_table(gapminder, options = list(rows.print = 15))
+
+
+ +
+
+
+
+
+
+

column

+
+

Graphique 2

+
+
ggplot(data = gapminder, aes(x = lifeExp)) +
+  geom_histogram(aes(y = ..density..), bins = 30) +
+  geom_density()
+
+
Warning: The dot-dot notation (`..density..`) was deprecated in ggplot2 3.4.0.
+ℹ Please use `after_stat(density)` instead.
+
+
+
+
+

+
+
+
+
+
+
+

Graphique 3

+
+
ggplot(data = gapminder, aes(x = lifeExp)) +
+  geom_histogram(aes(y = ..density..), bins = 30) +
+  geom_density()
+
+
+
+

+
+
+
+
+
+
+ +
+ + +
+ + + + + \ No newline at end of file diff --git a/M2/Data Visualisation/tp2/tp2.Rmd b/M2/Data Visualisation/tp2/tp2.Rmd index f547e38..877cd7d 100644 --- a/M2/Data Visualisation/tp2/tp2.Rmd +++ b/M2/Data Visualisation/tp2/tp2.Rmd @@ -467,6 +467,10 @@ g_map_acc périodiques. ::: +```{r} +library(flexdashboard) +``` + # Informations de session {.unnumbered} ```{r}