In houyunhuang/archncov: Visualize the Confirmed Cases of 'nCov' Through a Spiral

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)

archncov

The main purpose of archncov is to visualize the data of confirmed cases with spiral curves.

Installation

archncov is not on CRAN yet, you can install it from github:

## install.packages("devtools")
if(!require(ggvwline)) {
  devtools::install_github("houyunhuang/ggvwline")
}
if(!require(nCov2019)) {
  devtools::install_github("GuangchuangYu/nCov2019")
}
devtools::install_github("houyunhuang/archncov")

Example

library(archncov)
library(nCov2019)
library(ggplot2)
get_nCov2019()[] %>%
  tidy_arch_ncov(max.width = 50, max.size = 8, min.size = 0.5) %>% 
    plot(xlim = c(-1.5, 1.0))
get_nCov2019()["Sichuan", ] %>%
  tidy_arch_ncov(max.width = 50, max.size = 8, min.size = 0.5) %>% 
    plot(use.shadowtext = TRUE, xlim = c(-1.5, 1.0))