From 23cc1401602e9a2e62a4fa3e7204a5b19d2d57c6 Mon Sep 17 00:00:00 2001
From: Jesse Casman <jcasman@oppkey.com>
Date: Fri, 6 Sep 2024 07:31:22 -0700
Subject: [PATCH] updating events page

---
 news/events.qmd | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/news/events.qmd b/news/events.qmd
index 0ad4301..c96e7cf 100644
--- a/news/events.qmd
+++ b/news/events.qmd
@@ -12,7 +12,6 @@ format:
 # Sample data frame with HTML links
 df <- data.frame(
   Title = c(
-    "[EARL 2024](https://www.ascent.io/earl)",
     "[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)",
@@ -20,11 +19,11 @@ df <- data.frame(
     "[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("Sept 4-5, 2024", "Oct 9, 2024", "Oct 9-10, 2024",
+  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("Brighton, UK", "Virtual", "Newcastle upon Tyne, UK", "Washington D.C., USA", "Virtual", "Virtual", "Virtual"),
-  icon = c("Conference", "Webinar", "Conference", "Conference","Webinar", "Conference", "Webinar"),
-  Type = c("Conference", "Webinar",  "Conference", "Conference","Webinar", "Conference", "Webinar"),
+  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"),
   
   stringsAsFactors = FALSE
   
@@ -88,6 +87,7 @@ ___
 # Sample data frame with HTML links
 df <- data.frame(
   Title = c(
+    '<a href="https://www.ascent.io/earl" target="_blank" rel="noreferrer noopener">EARL 2024</a>', 
     '<a href="https://rconsortium.netlify.app/webinars/tidy-finance-webinar-series#optimize-portfolios-using-the-markowitz-model" target="_blank" rel="noreferrer noopener">Optimize Portfolios using the Markowitz Model</a>', 
     '<a href="https://www.r-project.org/conferences/" target="_blank" rel="noreferrer noopener">useR! 2024</a>', 
     '<a href="https://posit.co/conference/" target="_blank" rel="noreferrer noopener">posit::conf 2024</a>', 
@@ -108,6 +108,7 @@ df <- data.frame(
     '<a href="https://www.r-consortium.org/r-adoption-series-the-adoption-of-r-in-japans-pharma-industry-confirmation" target="_blank" rel="noreferrer noopener">The use of R in Japan’s Pharma Industry</a>'
   ),
   dates = c(
+        'September 4-5, 2024', 
         'September 4, 2024', 
         'July 8-11, 2024', 
         'August 12-14, 2024', 
@@ -129,6 +130,7 @@ df <- data.frame(
       
         ),
   location = c(
+        'Brighton, UK',
         'Virtual',
         'Salzburg, Austria',
         'Seattle, WA, USA', 
@@ -149,10 +151,10 @@ df <- data.frame(
         'Virtual'
 
         ),
-  Type = c('Webinar', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference',
+  Type = c('Conference', 'Webinar', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference',
     'Conference', 'Conference', 'Webinar', 'Webinar', 'Webinar', 'Webinar', 'Webinar', 'Webinar',
     'Webinar', 'Webinar', 'Webinar'),
-  icon = c('Webinar', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference',
+  icon = c('Conference', 'Webinar', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference', 'Conference',
     'Conference', 'Conference', 'Webinar', 'Webinar', 'Webinar', 'Webinar', 'Webinar', 'Webinar',
     'Webinar', 'Webinar', 'Webinar'),