knitr::opts_chunk$set( echo = FALSE, message = FALSE, warning = FALSE, collapse = TRUE, comment = "#>" )
library(covidpub) options(lubridate.week.start = 1) options(readr.show_col_types = FALSE) billboarder::set_theme("insight")
main_dates <- covidpub:::fetch_main_date_range() main_dates_fmt <- fmt_bdy(main_dates) race_date_fmt <- fmt_bdy(covidpub:::fetch_race_date()) test_dates_fmt <- fmt_bdy(covidpub:::fetch_test_date()) streak_dates <- covidpub:::calc_hosp_streak() streak_dates_fmt <- fmt_bdy(streak_dates) streak_duration <- duration_wks(streak_dates, count_first = TRUE) hosp_dates_fmt <- fmt_bdy(covidpub:::fetch_hosp_date_range()) roll_change_dates_fmt <- fmt_bdy(range(covidpub:::calc_rolling_change()$date)) excess_dates_fmt <- fmt_bdy(covidpub:::fetch_excess_date_range()) excess_high <- covidpub:::calc_excess_high() excess_high_date_fmt <- fmt_Bdy(excess_high$date) excess_high_pct <- pct_sig2(excess_high$percent) hhp_dates <- covidpub:::fetch_hhp_date_range() hhp_dates_fmt <- fmt_bdy(hhp_dates) hhp_wks <- duration_wks(hhp_dates, count_first = FALSE)
counties <- sort(unique(town_county$county)) pals <- make_colors() county_pal <- stats::setNames(pals$qual_pal, c("Connecticut", counties)) %>% rlang::set_names(stringr::str_remove, " County$") race_pal <- stats::setNames(pals$qual_pal[c(1, 8, 5, 6, 7)], c("Total", "Black", "Latino", "White", "Asian")) cat_pal <- stats::setNames(pals$qual_pal[c(1, 3, 6, 5, 8)], c("CT", "By age", "By income", "By race/ethnicity", "By presence of kids"))
This webpage provides graphics that are intended to communicate what we know about COVID-19 (also known as SARS-CoV-2) in Connecticut. These charts are not intended to predict any scenarios about the disease or the people affected by it. They merely reflect data that DataHaven has already collected at the town, county, and state levels. To the extent possible, this webpage is updated weekly.
For the latest information from the Connecticut Department of Public Health, visit http://portal.ct.gov/Coronavirus
r main_dates_fmt[2] {.viz-title}Rates are given here per 10,000 people by location—that is, a rate of 20 per 10,000 people in a town would mean that for every 10,000 residents of that town, an average of 20 people have tested positive for COVID-19.
make_1d_cases_table(max(main_dates))
Data show higher rates of detected cases and deaths among Black and Latino residents than other groups. The statewide total rates shown include patients without race/ethnicity given. Rates are again given per 10,000 people by race/ethnicity and adjusted for age. Age-adjusted data are preferable in comparing racial groups because they account for differing age distributions in populations.
r main_dates_fmt[1] to r main_dates_fmt[2] {.viz-title}make_county_trend_chart(county_pal)
r test_dates_fmt[1] to week of r test_dates_fmt[2] {.viz-title}As access to testing expands with fewer restrictions blocking asymptomatic people from being tested, the test positivity rate (the percentage of tests administered that come back positive) has become another useful metric for measuring the response to the pandemic. Increasing the number of tests administered across the population means health officials have a better chance of detecting cases with few or no symptoms. Widespread, robust testing means the positivity rate should become very low; WHO guidance recommends maintaining a positivity rate below 5 percent as a target.
r test_dates_fmt[1] to week of r test_dates_fmt[2] {.viz-title}make_test_pos_chart(pals$qual_pal[2])
The most recent continuous weekly decrease in average hospitalizations was between the week of r streak_dates_fmt[1] and the week of r streak_dates_fmt[2], a streak of r streak_duration weeks of decline.
r hosp_dates_fmt[1] to week of r hosp_dates_fmt[2] {.viz-title}make_hosp_change_chart(rev(pals$div_pal3))
Summarizing the past seven days of trends helps to smooth out daily jumps or drops in the number of reported cases. Looking at the seven days before that helps contextualize the most recent seven-day period. In rare instances, counties revise their case counts retroactively; if that happens over the 14 days shown here, that county is not displayed.
Please note that during some periods, such as major holidays, testing and reporting can be limited. Around those times, a decrease in the number of new cases may simply be an artifact of those delays rather than an actual decline.
make_period_change_table()
r roll_change_dates_fmt[1] to r roll_change_dates_fmt[2] {.viz-title}make_period_change_chart(pals$div_pal5)
Another way of calculating the number of deaths related to COVID-19 is to estimate how many deaths might be expected to occur in any given week, based on several years of recent trends, and then compare those to the observed number of COVID-19 deaths that reported week. This assumes, in the absence of other deadly events, that COVID-19 accounts for a large part of the unexplained excess. This excess deaths estimation method helps mitigate issues with limited access to testing, particularly in the earlier months of the pandemic, inconsistent testing protocols, and differences in record keeping across municipalities and hospitals, all of which have made it difficult to know the pandemic's exact death toll.
During the week of April 18, 2020, at the pandemic’s early peak, the number of deaths observed in Connecticut was more than twice the number that would be expected based on recent years. Of the available data, the most recent week in which deaths were above the expected range was the week of r excess_high_date_fmt, when the observed number of deaths was r excess_high_pct above average. Note that this dataset has a lag of a few weeks.
r excess_dates_fmt[1] to r excess_dates_fmt[2] {.viz-title}make_excess_deaths_chart(pals$div_pal5[c(2, 5)])
DataHaven conducted a special version of its 2020 Community Wellbeing Survey, with a statewide sample of more than 1,100 adult participants. The 2020 survey included a set of questions related to COVID-19 and its impacts on residents' well-being, resources, and quality of life.
Survey participants were asked to rate the amount of trust they have in each of several public institutions to keep themselves and their families safe. Below are the shares of adults who reported having a great amount or a fair amount of trust in each institution.
make_cws_trust_chart(pals$qual_pal[2])
Survey participants were also asked how often they leave their home for work. Out of currently working adults, the shares saying they leave for work very often are below.
make_cws_leave_home_chart(cat_pal)
See data from this and previous years of the Community Wellbeing Survey on DataHaven's website.
The US Census Bureau conducted a Household Pulse Survey between April and July to gauge several economic and health indicators throughout the country. The survey questions summarized here are for adults in Connecticut, based on the first wave of data released.
Loss of income measures the share of adults for whom at least one member of their household lost work-related income (i.e. not public benefits) since March 13, 2020. Food insecurity refers to the share of adults that report having sometimes or often not had enough food at home over the previous 7 days. Housing insecurity refers to the share of adults that report having little to no confidence that their next month's housing payments can be made on time, out of adults whose households pay either rent or a mortgage.
r hhp_dates_fmt[1] to r hhp_dates_fmt[2], Connecticut {.viz-title}hhp_bars <- make_hhp_single_chart(cat_pal) hhp_bars[["lost_work"]]
r hhp_dates_fmt[1] to r hhp_dates_fmt[2], Connecticut {.viz-title}hhp_bars[["food_insecure"]]
r hhp_dates_fmt[1] to r hhp_dates_fmt[2], Connecticut {.viz-title}make_hhp_housing_chart(pals$qual_pal[c(1, 3)])
r hhp_wks, https://www.census.gov/householdpulsedataAdd the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.