From 00a6dd63e3d7a2273978fd15b3d5389ed5bf6744 Mon Sep 17 00:00:00 2001
From: Lextuga007 <zoe.turner3@nhs.net>
Date: Mon, 21 Oct 2024 10:36:00 +0100
Subject: [PATCH] Added debugging note for use of NHSRpopulation package code

---
 imd.qmd | 25 +++++++++++++------------
 1 file changed, 13 insertions(+), 12 deletions(-)

diff --git a/imd.qmd b/imd.qmd
index c06103d..4c615a7 100644
--- a/imd.qmd
+++ b/imd.qmd
@@ -211,18 +211,19 @@ tibble_postcodes <- dplyr::tibble(
   random_postcodes = postcodes,
 )
 
-NHSRpopulation::get_data(tibble_postcodes,
-  column = "random_postcodes",
-  url_type = "imd"
-) |>
-  dplyr::select(
-    random_postcodes,
-    new_postcode,
-    imd_decile,
-    imd_rank,
-    imd_score
-  ) |>
-  mutate(imd_decile_local = ntile(-imd_score, n = 10)) # creating new deciles from the data provided
+## Debugging
+# NHSRpopulation::get_data(tibble_postcodes,
+#   column = "random_postcodes",
+#   url_type = "imd"
+# ) |>
+#   dplyr::select(
+#     random_postcodes,
+#     new_postcode,
+#     imd_decile,
+#     imd_rank,
+#     imd_score
+#   ) |>
+#   mutate(imd_decile_local = ntile(-imd_score, n = 10)) # creating new deciles from the data provided
 ```
 
 ## LSOAs - by postcode and by Local Authority/District