diff --git a/news/events.qmd b/news/events.qmd
index 2fbe3eb..9a5896a 100644
--- a/news/events.qmd
+++ b/news/events.qmd
@@ -15,15 +15,16 @@ df <- data.frame(
     "[Evaluate Performance using the Capital Asset Pricing Model](https://rconsortium.netlify.app/webinars/tidy-finance-webinar-series#evaluate-performance-using-the-capital-asset-pricing-model)",
     "[Shiny in Production 2024](https://shiny-in-production.jumpingrivers.com/)",
     "[2024 Government & Public Sector R Conference](https://www.rstats.ai/gov)",
+    "[R/Pharma 2024](https://rinpharma.com/)",
     "[Analyze Companies using Financial Ratios](https://rconsortium.netlify.app/webinars/tidy-finance-webinar-series#analyze-companies-using-financial-ratios)",
     "[LatinR 2024](https://latinr.org/en/)",
     "[Value Companies using Discounted Cash Flow Analysis](https://rconsortium.netlify.app/webinars/tidy-finance-webinar-series#value-companies-using-discounted-cash-flow-analysis)"
   ),
   dates = c("Oct 9, 2024", "Oct 9-10, 2024",
-            "Oct 29-30, 2024", "Nov 6, 2024", "Nov 18-22, 2024", "Dec 4, 2024"),
-  location = c("Virtual", "Newcastle upon Tyne, UK", "Washington D.C., USA", "Virtual", "Virtual", "Virtual"),
-  icon = c("Webinar", "Conference", "Conference","Webinar", "Conference", "Webinar"),
-  Type = c("Webinar",  "Conference", "Conference","Webinar", "Conference", "Webinar"),
+            "Oct 29-30, 2024", "Oct 29-31, 2024", "Nov 6, 2024", "Nov 18-22, 2024", "Dec 4, 2024"),
+  location = c("Virtual", "Newcastle upon Tyne, UK", "Washington D.C., USA", "Virtual", "Virtual", "Virtual", "Virtual"),
+  icon = c("Webinar", "Conference", "Conference", "Conference", "Webinar", "Conference", "Webinar"),
+  Type = c("Webinar",  "Conference", "Conference", "Conference", "Webinar", "Conference", "Webinar"),
   
   stringsAsFactors = FALSE