From 9400f93ca11dc552718ec732c0531adc22f7c0a4 Mon Sep 17 00:00:00 2001
From: Damonamajor <damon.major@cookcountyil.gov>
Date: Wed, 8 Jan 2025 16:42:07 +0000
Subject: [PATCH] lintr

---
 reports/performance/_outliers.qmd | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/reports/performance/_outliers.qmd b/reports/performance/_outliers.qmd
index 146740d..9731a44 100644
--- a/reports/performance/_outliers.qmd
+++ b/reports/performance/_outliers.qmd
@@ -491,4 +491,21 @@ assessment_card %>%
     "Negative Card FMV" = sum(pred_card_initial_fmv < 0, na.rm = TRUE)
   ) %>%
   datatable()
+```
+
+### Pin Level
+
+```{r _outliers_output_errors_pin}
+assessment_pin %>%
+  summarize(
+    "NA Pin FMV" = sum(is.na(pred_pin_final_fmv)),
+    "Negative Pin FMV" = sum(pred_pin_final_fmv < 0, na.rm = TRUE),
+    "NA Building FMV" = sum(is.na(pred_pin_final_fmv_bldg)),
+    "Negative Building FMV" = sum(pred_pin_final_fmv_bldg < 0, na.rm = TRUE),
+    "NA Land FMV" = sum(is.na(pred_pin_final_fmv_land)),
+    "Negative Land FMV" = sum(pred_pin_final_fmv_land < 0, na.rm = TRUE)
+  ) %>%
+  datatable()
+```
+
 :::