From a349890cab43dea90bc3f20cdf33a7cf6c8fc0c3 Mon Sep 17 00:00:00 2001
From: CJ Yetman <cyetman@rmi.org>
Date: Sat, 10 Feb 2024 04:46:38 +0100
Subject: [PATCH] ensure the AI Company ID to Entity ID data has only distinct
 rows (#116)

closes #101
---
 run_pacta_data_preparation.R | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/run_pacta_data_preparation.R b/run_pacta_data_preparation.R
index bfcd506..cf7b5be 100644
--- a/run_pacta_data_preparation.R
+++ b/run_pacta_data_preparation.R
@@ -243,7 +243,8 @@ factset_entity_id__ar_company_id <-
   select(
     factset_entity_id = "factset_id",
     ar_company_id = "company_id"
-  )
+  ) %>%
+  distinct()
 readRDS(factset_entity_info_path) %>%
   pacta.data.preparation::prepare_entity_info(factset_entity_id__ar_company_id) %>%
   saveRDS(file.path(data_prep_outputs_path, "entity_info.rds"))