From d90367917de66e4f31e93166bfb74440d2f1f525 Mon Sep 17 00:00:00 2001
From: Wang Jiayi <95198512+wjiayis@users.noreply.github.com>
Date: Wed, 22 Dec 2021 21:46:25 +0800
Subject: [PATCH] Update [M]-(Frequency)-Vertical-Barplot.md

---
 .../[SC]-Data-Visualisation/[M]-(Frequency)-Vertical-Barplot.md  | 1 +
 1 file changed, 1 insertion(+)

diff --git a/[SC]-Descriptive-Analytics/[SC]-Data-Visualisation/[M]-(Frequency)-Vertical-Barplot.md b/[SC]-Descriptive-Analytics/[SC]-Data-Visualisation/[M]-(Frequency)-Vertical-Barplot.md
index ca1b665b..411bc5c3 100644
--- a/[SC]-Descriptive-Analytics/[SC]-Data-Visualisation/[M]-(Frequency)-Vertical-Barplot.md
+++ b/[SC]-Descriptive-Analytics/[SC]-Data-Visualisation/[M]-(Frequency)-Vertical-Barplot.md
@@ -39,6 +39,7 @@ HEC <- aggregate(Freq~Hair, HEC, sum)
 ```r
 ggplot(data = HEC, aes(x = Hair, y = Freq)) + # dataset_variable
   geom_bar(stat = "identity", fill = "pink") + # Colour
+  labs(title = "Barplot of Frequency of Hair Colour") + # Title
   #geom_text(aes(label = Freq), vjust = -0.3, color = "black", size = 3.5) # 'Outside-bars' value labels
   geom_text(aes(label = Freq), vjust = 1.6, color = "black", size = 3.5) # 'Within-bars' value labels
 ```