COVID-19 Cases in U.S. State of Georgia

J. Register
19 March 2021

PANDEMIC SITUATION

COVID-19 is the latest pandemic to plague humanity.

Citizens require up-to-date information about where COVID-19 is occurring so that they may take action to protect themselves and their families.
To assist the citizens of the U.S. state of Georgia, a web-based application has been developed to provide a snapshot of COVID-19 infections by county.
Graphic Source: [https://www.visualcapitalist.com/history-of-pandemics-deadliest/] –>

History of Pandemics

APPLICATION OVERVIEW

The GACovid19 Cases is a web-based application which utilizes the Shiny package to provide an interactive experience for the user to look at Georgia COVID-19 data. R is the underlying programming language.

FEATURES

The application reports the latest (GA COVID-19 Daily Status Report)[https://dph.georgia.gov/covid-19-daily-status-report]
COVID-19 data by county is displayed on an interactive map which shows the COVID-19 cases in Georgia counties (Georgia has the second most counties in the United States (159)).
– The size of the circle is proportional to death rate. – Filters by death rate and county population size can be used to change the display
A detailed table of COVID-19 data which can be sorted by various metrics

APPLICATION ARCHITECTURE

Application Architecture

DATA LOAD

Below is the code used to extract the GA DPH Daily COVID-19 status report

temp <- tempfile()
download.file("https://ga-covid19.ondemand.sas.com/docs/ga_covid_data.zip", temp, mode="wb")
unzip(temp,"county_cases.csv")
GACovidData <- read.table("county_cases.csv", sep=",", header=TRUE)
unlink(temp)
head(GACovidData)

  county_name cases county_id State.FIPS.code County.FIPS.code population
1     Appling  1850  US-13001              13                1      18561
2    Atkinson   762  US-13003              13                3       8330
3       Bacon  1023  US-13005              13                5      11404
4       Baker   159  US-13007              13                7       3116
5     Baldwin  3758  US-13009              13                9      44428
6       Banks  1583  US-13011              13               11      19982
  hospitalization deaths case.rate death.rate X14.day.case.rate X14.day.cases
1             166     62   9967.14     334.03            123.92            23
2             113     16   9147.66     192.08             12.00             1
3              76     28   8970.54     245.53             17.54             2
4              33      9   5102.70     288.83              0.00             0
5             308    107   8458.63     240.84             72.03            32
6             181     33   7922.13     165.15            115.10            23
  antigen_cases probable_deaths
1           381               5
2           222               1
3           336               8
4            63               0
5           595              12
6           156               1