From 80b4b54a0223d586bfa73aacdd116f2037eeb535 Mon Sep 17 00:00:00 2001
From: Laurent Modolo <laurent@modolo.fr>
Date: Thu, 14 Nov 2019 12:55:25 +0100
Subject: [PATCH] add session 4 slides

---
 web/4_a | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 web/4_a

diff --git a/web/4_a b/web/4_a
new file mode 100644
index 0000000..9773d7c
--- /dev/null
+++ b/web/4_a
@@ -0,0 +1,10 @@
+flights_sml <- select(flights, 
+  year:day, 
+  ends_with("delay"), 
+  distance, 
+  air_time
+)
+mutate(flights_sml,
+  gain = dep_delay - arr_delay,
+  speed = distance / air_time * 60
+)
\ No newline at end of file
-- 
GitLab