Closes #35 moved presentation archive to gt (#40)

* #35 moved presentation archive to gt * Update DESCRIPTION * #35 removed interactivity, documentated data * #35 correct typo, document data --------- Co-authored-by: Daniel Sjoberg <[email protected]>
pharmaverse · Jan 29, 2024 · 61e4e02 · 61e4e02
1 parent 664e16b
commit 61e4e02
Show file tree

Hide file tree

Showing 7 changed files with 46 additions and 13 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -42,4 +42,4 @@ Encoding: UTF-8
 Language: en-US
 LazyData: true
 Roxygen: list(markdown = TRUE)
-RoxygenNote: 7.3.0
+RoxygenNote: 7.3.1
diff --git a/R/data.R b/R/data.R
@@ -3,3 +3,9 @@
 #' This data set lists admiral functions and links them to ADaM data sets and
 #' variables they help create.
 "discovery"
+
+#' Presentation Archive
+#'
+#' This data set contains information and links to resources of recent presentations
+#' about admiral-related topics.
+"presentation_archive"
diff --git a/data-raw/presentation_archive.R b/data-raw/presentation_archive.R
@@ -0,0 +1,3 @@
+presentation_archive <- readr::read_csv(file = "./inst/presentation_archive.csv")
+
+usethis::use_data(presentation_archive, overwrite = TRUE)
diff --git a/data/presentation_archive.rda b/data/presentation_archive.rda
diff --git a/inst/presentation_archive.csv b/inst/presentation_archive.csv
@@ -0,0 +1,11 @@
+Year,Title,Conference,Material
+2023,{admiral} - from Open Source to Company Implementation,R in Pharma 2023,[Paper](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/EU/Birmingham/PAP_TT03.pdf) [Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/EU/Birmingham/PRE_TT03.pdf)
+2023,{admiral} - from Open Source to Company Implementation,R in Pharma 2023,[Recording](https://www.youtube.com/watch?v=ZbV3E0_xrrI)
+2023,Cross Industry Package Development,R in Pharma 2023,[Recording](https://www.youtube.com/watch?v=M4L1PPMu0pU)
+2023,Paving the Way for Clinical Submissions in R,PHUSE SDE - London UK,[Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/SDE/EU/London/PRE_London09.pdf)
+2023,An overview of {admiral},PHUSE SDE - Summit NJ,[Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/SDE/US/Summit/PRE_Summit03.pdf)
+2023,{admiralonco},PHUSE US Connect 2023 - Orlando FL,[Recording](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/US/Florida/REC_OS12.mp4) [Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/US/Florida/PRE_OS12.pdf)
+2023,Programming ADNCA using R and {admiral},PHUSE US Connect 2023 - Orlando FL,[Recording](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/US/Florida/REC_OS09.mp4)
+2022,Clinical Reporting in R,R in Pharma 2022,[Workshop Recording](https://youtu.be/9eod8MLF5ys?si=T9_WwE-K8yGtZlOn)
+2022,Pharmaverse Workshop, PHUSE US Connect 2022 - Atlanta GA,[Slides and resources](https://github.com/pharmaverse/pharmaverse.workshop.phuseUS2022) (including `{admiral}` workshop slides from PHUSE EU Connect 2021)
+2021,Introducing {admiral}, R in Pharma 2021,[Recording](https://www.youtube.com/watch?v=N7Bw8c3D5fU)
diff --git a/man/presentation_archive.Rd b/man/presentation_archive.Rd
diff --git a/vignettes/presentation_archive.Rmd b/vignettes/presentation_archive.Rmd
@@ -20,15 +20,11 @@ knitr::opts_chunk$set(
 
 In the table below you can find links to material from various `{admiral}`-related presentations given by members of our community over the years.
 
-| Year             | Title                                                                    | Conference                                                           | Presentation Material                                                                                                                                                                                       |
-| ---------------- | ------------------------------------------------------------------------ | -------------------------------------------------------------------- | ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- |
-| 2023             | The Development of {admiralophtha}                                       | PHUSE EU Connect 2023 - Birmingham, UK                               | [Paper](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/EU/Birmingham/PAP_TT03.pdf), [Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/EU/Birmingham/PRE_TT03.pdf) |
-| 2023             | {admiral} - from Open Source to Company Implementation                   | R in Pharma 2023                                                     | [Recording](https://www.youtube.com/watch?v=ZbV3E0_xrrI)                                                                                                                                                    |
-| 2023             | Cross Industry Package Development                                       | R in Pharma 2023                                                     | [Recording](https://www.youtube.com/watch?v=M4L1PPMu0pU)                                                                                                                                                    |
-| 2023             | Paving the Way for Clinical Submissions in R                             | PHUSE SDE - London, UK                                               | [Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/SDE/EU/London/PRE_London09.pdf)                                                                                                           |
-| 2023             | An overview of {admiral}                                                 | PHUSE SDE - Summit, NJ                                               | [Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/SDE/US/Summit/PRE_Summit03.pdf)                                                                                                           |
-| 2023             | {admiralonco}                                                            | PHUSE US Connect 2023 - Orlando, FL                                  | [Recording](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/US/Florida/REC_OS12.mp4), [Slides](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/US/Florida/PRE_OS12.pdf)   |
-| 2023             | Programming ADNCA using R and {admiral}                                  | PHUSE US Connect 2023 - Orlando, FL                                  | [Recording](https://phuse.s3.eu-central-1.amazonaws.com/Archive/2023/Connect/US/Florida/REC_OS09.mp4)                                                                                                       |
-| 2022             | Clinical Reporting in R                                                  | R in Pharma 2022                                                     | [Workshop Recording](https://youtu.be/9eod8MLF5ys?si=T9_WwE-K8yGtZlOn)                                                                                                                                      |
-| 2022             | Pharmaverse Workshop                                                     | PHUSE US Connect 2022 - Atlanta, GA                                  | [Slides and resources](https://github.com/pharmaverse/pharmaverse.workshop.phuseUS2022) (including `{admiral}` workshop slides from PHUSE EU Connect 2021)                                                  |
-| 2021             | Introducing {admiral}                                                    | R in Pharma 2021                                                     | [Recording](https://www.youtube.com/watch?v=N7Bw8c3D5fU)                                                                                                                                                    |
+```{r echo=FALSE}
+admiraldiscovery::presentation_archive |> 
+  gt::gt() |>
+  gt::fmt_markdown(columns = c("Material")) |>
+  gt::cols_width(Year ~ gt::pct(4), Material ~ gt::pct(8), c(Title, Conference) ~ gt::pct(20)) |>
+  gt::cols_align(align = "left")
+```
+
Original file line number	Diff line number	Diff line change
		@@ -0,0 +1,3 @@
		presentation_archive <- readr::read_csv(file = "./inst/presentation_archive.csv")

		usethis::use_data(presentation_archive, overwrite = TRUE)