From 335a0cb2917c1b12637eef19e1a845c654636ab5 Mon Sep 17 00:00:00 2001
From: Hadley Wickham <h.wickham@gmail.com>
Date: Sun, 4 Oct 2020 16:05:58 -0500
Subject: [PATCH] Remove extra pipe

Fixes #777
---
 hierarchy.Rmd | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hierarchy.Rmd b/hierarchy.Rmd
index 1d8c8f6..a91ba7c 100644
--- a/hierarchy.Rmd
+++ b/hierarchy.Rmd
@@ -183,6 +183,6 @@ df %>% transpose() %>% str()
     files <- dir("data", pattern = "\\.csv$")
     files %>%
       set_names(., basename(.)) %>%
-      map_df(safely(readr::read_csv), .id = "filename") %>%
+      map_df(safely(readr::read_csv), .id = "filename")
     ```