bloomberg.Rmd

---
title: "Bloomberg American Health Case Studies"
description: "Open Case Studies funded by the Bloomberg American Health Initiative — real-world public health data science education."
---

```{css, echo=FALSE}
.cs-section {
  margin-bottom: 28px;
  font-family: -apple-system, BlinkMacSystemFont, "Segoe UI", Roboto, Arial, sans-serif;
}
.cs-section-title {
  font-size: 1.3rem;
  font-weight: 700;
  letter-spacing: 0.08em;
  font-family: -apple-system, BlinkMacSystemFont, "Segoe UI", Roboto, Arial, sans-serif;
  margin: 0 0 12px 0;
  padding-bottom: 6px;
  border-bottom: 2px solid currentColor;
}
.cs-grid {
  display: grid;
  grid-template-columns: repeat(2, 1fr);
  gap: 12px;
}
.cs-card {
  border: none;
  border-radius: 6px;
  padding: 12px 16px;
  text-decoration: none;
  color: #ffffff;
  display: block;
  text-align: center;
  transition: filter 0.2s, transform 0.2s;
  font-size: 1.4rem;
  line-height: 1.4;
  font-family: -apple-system, BlinkMacSystemFont, "Segoe UI", Roboto, Arial, sans-serif;
}
.cs-card:hover {
  filter: brightness(0.88);
  transform: translateY(-2px);
  color: #ffffff;
  text-decoration: none;
}
.bloomberg-btn {
  display: inline-block;
  padding: 14px 32px;
  background: white;
  color: #003366;
  text-decoration: none;
  border-radius: 8px;
  font-weight: 600;
  font-size: 1.05rem;
  transition: transform 0.2s, box-shadow 0.2s;
  margin: 6px;
}
.bloomberg-btn:hover {
  transform: translateY(-3px);
  box-shadow: 0 4px 14px rgba(0,0,0,0.25);
  color: #003366;
  text-decoration: none;
}
.features-grid {
  display: grid;
  grid-template-columns: repeat(auto-fit, minmax(220px, 1fr));
  gap: 24px;
  margin: 32px 0;
}
.feature-card {
  background: #f9f9f9;
  border-radius: 8px;
  padding: 28px 24px;
  border-left: 4px solid #003366;
}
.feature-card h3 {
  font-size: 1.15rem;
  font-weight: 600;
  color: #003366;
  margin: 0 0 10px 0;
}
.feature-card p {
  color: #555;
  font-size: 0.97rem;
  line-height: 1.6;
  margin: 0;
}
.pub-card {
  border-left: 4px solid #003366;
  padding: 14px 20px;
  margin: 16px 0;
  background: #f9f9f9;
  border-radius: 0 6px 6px 0;
}
.pub-card a {
  font-weight: 600;
  color: #003366;
}
.coming-soon-box {
  background: #f0f4f8;
  border: 1.5px dashed #003366;
  border-radius: 8px;
  padding: 28px 32px;
  text-align: center;
  color: #555;
  margin-top: 16px;
}
.coming-soon-box h3 {
  color: #003366;
  font-size: 1.4rem;
  margin: 0 0 10px 0;
}
.skills-grid {
  display: grid;
  grid-template-columns: repeat(3, 1fr);
  gap: 20px;
  margin: 1px 0 2px 0;
}
.skills-col {
  background: #f9f9f9;
  border-radius: 8px;
  padding: 20px 22px;
  border-top: 4px solid #238A8D;
}
.skills-col h3 {
  font-size: 2rem;
  font-weight: 700;
  color: #238A8D;
  text-transform: uppercase;
  margin: 0 0 1px 0 !important;
  padding-top: 0 !important;
}
.skills-col ul {
  list-style: none;
  padding: 0;
  margin: 0;
}
.skills-col ul li {
  padding: 5px 0;
  font-size: 1.4rem;
  color: #333;
  border-bottom: 1px solid #eee;
  line-height: 1.4;
}
.skills-col ul li:last-child { border-bottom: none; }
.skills-col ul li::before {
  content: "▸";
  color: #fbb731;
  font-weight: 700;
  margin-right: 7px;
}
```
---

<img src="resources/bloomberg_ocs_logo.png" alt="Bloomberg American Health Initiative logo" style="max-width: 320px; margin-bottom: 24px; display: block;">

## About the Project

As part of the larger Open Case Studies project (OCS), these case studies were developed for and funded by the [Bloomberg American Health Initiative](https://americanhealth.jhu.edu/bloomberg-american-health-open-case-studies-project). The OCS project is made up of a team of researchers at the Johns Hopkins Bloomberg School of Public Health (JHSPH).
<br>

## What You'll Work With

<div class="skills-grid">

<div class="skills-col">
<h3>Question Type</h3>
<ul>
<li>Changes over time?</li>
<li>Differences in groups? regions?</li>
<li>Differences in groups over time?</li>
<li>Differences in paired groups?</li>
<li>Predict outcomes for new data?</li>
<li>Does this influence my data?</li>
<li>Relationships between variables?</li>
<li>Display data for others to find, interpret and easily use</li>
</ul>
</div>

<div class="skills-col">
<h3>Data Type</h3>
<ul>
<li>PDF</li>
<li>CSV</li>
<li>Website</li>
<li>Excel</li>
<li>Text in images</li>
<li>API</li>
<li>Google sheets</li>
<li>Survey data / Code books</li>
<li>Multiple files</li>
</ul>
</div>

<div class="skills-col">
<h3>Wrangling Methods</h3>
<ul>
<li>Extracting data from a PDF</li>
<li>Geocoding data</li>
<li>Joining data</li>
<li>Filtering data</li>
<li>Reshaping data</li>
<li>Transforming data</li>
<li>Working with text data</li>
<li>Repetitive processes</li>
</ul>
</div>
<br>
</div>

## What You'll Learn

<div class="skills-grid">

<div class="skills-col">
<h3>Intro Data Viz</h3>
<ul>
<li>Interpretable tables</li>
<li>Scatter plots, line plots, bar plots</li>
<li>Pie chart / waffle plots</li>
<li>Heat maps</li>
<li>Correlation plots</li>
<li>Visualize missing data</li>
<li>Creating maps of your own data</li>
</ul>
</div>

<div class="skills-col">
<h3>Data Viz</h3>
<ul>
<li>Data visualization styles</li>
<li>Facet plots</li>
<li>Adding labels &amp; annotations</li>
<li>Adding error bars</li>
<li>Combining multiple plots</li>
<li>Interactive plots</li>
<li>Interactive maps</li>
<li>Interactive dashboards</li>
</ul>
</div>

<div class="skills-col">
<h3>Analysis Methods</h3>
<ul>
<li>Percentages with missing data</li>
<li>t-tests</li>
<li>Correlation and causation</li>
<li>ANOVA</li>
<li>Linear regression</li>
<li>Chi-squared test of independence</li>
<li>Mann-Kendall Trend test</li>
<li>Machine learning</li>
</ul>
</div>
<br>
</div>

## Case Studies

```{r case-study-cards, echo=FALSE, message=FALSE, results='asis'}
library(readr)
library(dplyr)

df <- read_csv("OCS_info_co2int_only.csv", show_col_types = FALSE)

bp <- df |>
  filter(grepl("ocs-bp-", repo_name)) |>
  select(case_study_name, Title, case_study_url)

sections <- list(
  list(
    title = "Obesity and the Food System",
    color = "#E07B39",
    repos  = c("ocs-bp-rural-and-urban-obesity", "ocs-bp-diet")
  ),
  list(
    title = "Environmental Challenges",
    color = "#3A8C5C",
    repos  = c("ocs-bp-co2-emissions", "ocs-bp-air-pollution")
  ),
  list(
    title = "Addiction and Overdose",
    color = "#8E44AD",
    repos  = c("ocs-bp-opioid-rural-urban", "ocs-bp-vaping-case-study")
  ),
  list(
    title = "Violence",
    color = "#C0392B",
    repos  = c("ocs-bp-RTC-wrangling", "ocs-bp-RTC-analysis",
               "ocs-bp-school-shootings-dashboard")
  ),
  list(
    title = "Adolescent Health",
    color = "#2471A3",
    repos  = c("ocs-bp-youth-disconnection", "ocs-bp-youth-mental-health")
  )
)

for (s in sections) {
  studies <- bp |> filter(case_study_name %in% s$repos)

  cards <- paste0(
    '<div><a class="cs-card" style="background:', s$color, ';" ',
    'href="', studies$case_study_url, '" target="_blank">',
    studies$Title,
    '</a></div>',
    collapse = "\n"
  )

  cat(
    '<div class="cs-section">',
    '<div class="cs-section-title" style="color:', s$color, ';">', s$title, '</div>',
    '<div class="cs-grid">', cards, '</div>',
    '</div>\n'
  )
}
```

<a href="search.html" class="bloomberg-btn" style="background:#003366; color:white; font-size:14px; display:block; text-align:center; margin-top:20px;">Browse All Case Studies →</a>