Skip to content

Commit

Permalink
Merge pull request #36 from higgi13425/operations
Browse files Browse the repository at this point in the history 
Edited index.qmd - removed capital N from the middle of Keynote, adde…
  • Loading branch information
@joseph-rickert
joseph-rickert authored Mar 20, 2024
2 parents 0e8aec1 + b767ec3 commit 820db29
Show file tree
Hide file tree
Showing 9 changed files with 869 additions and 398 deletions.
59 changes: 28 additions & 31 deletions Program.qmd
View file
Original file line number Diff line number Diff line change
@@ -1,4 +1,3 @@

---
title: "R/Medicine Schedule"
author: "Rich Iannone"
Expand All @@ -18,11 +17,11 @@ library(gt)
schedule_day_1 <-
dplyr::tribble(
~start_time, ~end_time, ~t_number, ~t_type, ~t_title, ~t_speakers, ~t_speaker_titles, ~t_companies,
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Workshop", "Causal Inference in R", "Lucy D'Agostino McGowan, Malcom Barrett", "Assistant Professor, Research Software Engineer", "Wake Forest University, Stanford University",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:00", "2024-06-10 14:30", NA, "Break", NA, NA, NA, NA,
"2024-06-10 14:30", "2024-06-10 15:15", "2", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:15", "2024-06-10 17:30", "3", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:30", "2024-06-10 16:30", "2A", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:30", "2024-06-10 17:30", "2B", "Workshop", "title", "speakers", "speaker_titles", "companies",
) |>
dplyr::mutate(duration = time_length(ymd_hm(end_time) - ymd_hm(start_time), unit = "mins"))
```
Expand All @@ -31,7 +30,7 @@ schedule_day_1 <-
# Create a table for the day of events
gt(schedule_day_1) |>
tab_header(title = md("<br>Monday, June 10, 2024.<br><br>")) |> # <- insert the date
tab_header(title = md("<br>Workshop Day 1<br>Monday, June 10, 2024.<br>All Times EST<br><br>")) |> # <- insert the date
fmt_time(columns = c(start_time, end_time), time_style = "h_m_p") |>
fmt_duration(
columns = duration,
Expand Down Expand Up @@ -76,11 +75,11 @@ library(gt)
schedule_day_2 <-
dplyr::tribble(
~start_time, ~end_time, ~t_number, ~t_type, ~t_title, ~t_speakers, ~t_speaker_titles, ~t_companies,
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:00", "2024-06-10 14:30", NA, "Break", NA, NA, NA, NA,
"2024-06-10 14:30", "2024-06-10 15:15", "2", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:15", "2024-06-10 16:30", "3", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:30", "2024-06-10 17:30", "2", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:30", "2024-06-10 17:30", "3", "Workshop", "title", "speakers", "speaker_titles", "companies",
) |>
dplyr::mutate(duration = time_length(ymd_hm(end_time) - ymd_hm(start_time), unit = "mins"))
```
Expand All @@ -89,7 +88,7 @@ schedule_day_2 <-
# Create a table for the day of events
gt(schedule_day_2) |>
tab_header(title = md("<br>Tuesday, June 11, 2024.<br><br>")) |> # <- insert the date
tab_header(title = md("<br>Workshop Day 2<br>Tuesday, June 11, 2024.<br><br>")) |> # <- insert the date
fmt_time(columns = c(start_time, end_time), time_style = "h_m_p") |>
fmt_duration(
columns = duration,
Expand Down Expand Up @@ -124,7 +123,6 @@ gt(schedule_day_2) |>
```


```{r}
#| echo: false
#| warning: false
Expand All @@ -135,11 +133,14 @@ library(gt)
schedule_day_3 <-
dplyr::tribble(
~start_time, ~end_time, ~t_number, ~t_type, ~t_title, ~t_speakers, ~t_speaker_titles, ~t_companies,
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:00", "2024-06-10 14:30", NA, "Break", NA, NA, NA, NA,
"2024-06-10 14:30", "2024-06-10 15:15", "2", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:15", "2024-06-10 16:30", "3", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 10:00", "2024-06-10 10:50", "1", "Demo", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 11:50", "2", "Demo", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 12:00", "2024-06-10 12:30", NA, "Break", NA, NA, NA, NA,
"2024-06-10 12:30", "2024-06-10 13:20", "3", "Demo", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 13:30", "2024-06-10 14:20", "4", "Demo", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:30", "2024-06-10 15:20", "5", "Demo", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:30", "2024-06-10 16:20", "6", "Demo", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 16:30", "2024-06-10 18:30", "7", "Poster Session", "Poster Session", NA, NA, NA,
) |>
dplyr::mutate(duration = time_length(ymd_hm(end_time) - ymd_hm(start_time), unit = "mins"))
```
Expand All @@ -148,7 +149,7 @@ schedule_day_3 <-
# Create a table for the day of events
gt(schedule_day_3) |>
tab_header(title = md("<br>Wednesday, June 12, 2024.<br><br>")) |> # <- insert the date
tab_header(title = md("<br>Demo Day<br>Wednesday, June 12, 2024.<br><br>")) |> # <- insert the date
fmt_time(columns = c(start_time, end_time), time_style = "h_m_p") |>
fmt_duration(
columns = duration,
Expand Down Expand Up @@ -183,8 +184,6 @@ gt(schedule_day_3) |>
```



```{r}
#| echo: false
#| warning: false
Expand All @@ -195,20 +194,20 @@ library(gt)
schedule_day_4 <-
dplyr::tribble(
~start_time, ~end_time, ~t_number, ~t_type, ~t_title, ~t_speakers, ~t_speaker_titles, ~t_companies,
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 11:10", "1", "Intro", "Welcome to R/Medicine 2024", "Peter Higgins", "Professor", "University of Michigan",
"2024-06-10 11:13", "2024-06-10 12:13", "2", "Keynote", "Statistical Challenges in Single-Cell and Spatial Transcriptomics", "Stephanie Hicks", "Associate Professor", "Johns Hopkins",
"2024-06-10 14:00", "2024-06-10 14:30", NA, "Break", NA, NA, NA, NA,
"2024-06-10 14:30", "2024-06-10 15:15", "2", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:15", "2024-06-10 16:30", "3", "Workshop", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 14:30", "2024-06-10 15:15", "3", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:15", "2024-06-10 16:30", "4", "Workshop", "title", "speakers", "speaker_titles", "companies",
) |>
dplyr::mutate(duration = time_length(ymd_hm(end_time) - ymd_hm(start_time), unit = "mins"))
```

```{r}
# Create a table for the day of events
gt(schedule_day_1) |>
tab_header(title = md("<br>Thursday, June 13, 2024.<br><br>")) |> # <- insert the date
gt(schedule_day_4) |>
tab_header(title = md("<br>Meeting Day 1<br>Thursday, June 13, 2024.<br><br>")) |> # <- insert the date
fmt_time(columns = c(start_time, end_time), time_style = "h_m_p") |>
fmt_duration(
columns = duration,
Expand Down Expand Up @@ -243,7 +242,6 @@ gt(schedule_day_1) |>
```


```{r}
#| echo: false
#| warning: false
Expand All @@ -254,8 +252,8 @@ library(gt)
schedule_day_5 <-
dplyr::tribble(
~start_time, ~end_time, ~t_number, ~t_type, ~t_title, ~t_speakers, ~t_speaker_titles, ~t_companies,
"2024-06-10 11:00", "2024-06-10 14:00", "1A", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 14:00", "1B", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 11:00", "2024-06-10 11:10", "1", "Intro", "Welcome to R/Medicine 2024", "Peter Higgins", "Professor", "University of Michigan",
"2024-06-10 11:13", "2024-06-10 12:13", "2", "Keynote", "Reproducibility in Medical Research", "Gundula Bosch", "Research Professor", "Johns Hopkins",
"2024-06-10 14:00", "2024-06-10 14:30", NA, "Break", NA, NA, NA, NA,
"2024-06-10 14:30", "2024-06-10 15:15", "2", "Talk", "title", "speakers", "speaker_titles", "companies",
"2024-06-10 15:15", "2024-06-10 16:30", "3", "Workshop", "title", "speakers", "speaker_titles", "companies",
Expand All @@ -267,7 +265,7 @@ schedule_day_5 <-
# Create a table for the day of events
gt(schedule_day_5) |>
tab_header(title = md("<br>Friday, June 14, 2024.<br><br>")) |> # <- insert the date
tab_header(title = md("<br>Meeting Day 2<br>Friday, June 14, 2024.<br><br>")) |> # <- insert the date
fmt_time(columns = c(start_time, end_time), time_style = "h_m_p") |>
fmt_duration(
columns = duration,
Expand Down Expand Up @@ -301,4 +299,3 @@ gt(schedule_day_5) |>
)
```

23 changes: 10 additions & 13 deletions README.md
View file
Original file line number Diff line number Diff line change
@@ -1,9 +1,7 @@
# RMedicine_website


This is Quarto-based and updates and supersedes the website [here:](https://events.linuxfoundation.org/r-medicine/)


## Contributing to this website

This website is being built live, bit-by-bit by members of the R/Medicine organizing committee and other volunteer contributors. The idea is to get information about the conference up as soon as it comes in. It is unlikely that the website will not be finalized until shortly before the conference. If you follow the progress of the website you will likely see information go up initially with modest formatting and little aesthetic charm. It is our hope that subsequent contributions will produce something worth saving for next year. This is an exercise in what the Japanese call ["Kaizen"](https://kaizen.com/what-is-kaizen/) or continuous improvement.
Expand All @@ -14,19 +12,19 @@ This website is being built live, bit-by-bit by members of the R/Medicine organi

#### 2. Select the appropriate branch

From your cloned (local) copy of the repository select a branch that is appropriate for your contribution. If you click on the pull-down branch button in the upper left hand corner of the first main [GitHub page](https://github.com/RConsortium/RMedicine_website) for this website you will see a number of branches.
From your cloned (local) copy of the repository select a branch that is appropriate for your contribution. If you click on the pull-down branch button in the upper left hand corner of the first main [GitHub page](https://github.com/RConsortium/RMedicine_website) for this website you will see a number of branches.

You will see that there are branches that correspond to each page listed on the tab bar at the top of the website:

| Website Page | Corresponding Branch|
|-----------------|---------------------|
| Home | home |
| Register | register |
| Program | program |
| Code of Conduct | Code_of_Conduct |
| Competition | competition |
| Contact us | Contact_us |
|Past Events | Past_events |
| Website Page | Corresponding Branch |
|-----------------|----------------------|
| Home | home |
| Register | register |
| Program | program |
| Code of Conduct | Code_of_Conduct |
| Competition | competition |
| Contact us | Contact_us |
| Past Events | Past_events |

Do not select the "operations" branch for anything. This is the main branch that drives the GitHub Actions code that publishes the website at https://rconsortium.github.io/RMedicine_website/.

Expand All @@ -42,7 +40,6 @@ Make your changes locally save them and commit them. Be sure to make your commit

If your changes are accepted they will be merged by a website administrator


Note: to look at the website locally you can execute it in your terminal:

```
Expand Down
8 changes: 3 additions & 5 deletions _freeze/Program/execute-results/html.json
View file

Large diffs are not rendered by default.

Loading

0 comments on commit 820db29

Please sign in to comment.