r - 用 R 将县级数据分组到各州
问题描述
我正在尝试使用位于以下位置的约翰霍普金斯大学 COVID-19 数据来学习 R:
https://github.com/CSSEGISandData/COVID-19/tree/master/csse_covid_19_data/csse_covid_19_time_series
我正在尝试使用 time_series_covid19_confirmed_US.csv 文件。数据采用时间序列格式,分辨率低至县级。我想处理每天的州级总数。我能够删除我不需要的信息列,但在尝试将县分组为州时遇到了困难。
解决方案
这是一种方法dplyr
。我们可以使用该RCurl
库轻松下载数据。
library(RCurl)
library(dplyr)
url <- "https://raw.githubusercontent.com/CSSEGISandData/COVID-19/master/csse_covid_19_data/csse_covid_19_time_series/time_series_covid19_confirmed_US.csv"
raw <- getURL(url)
data <- read.csv(text=raw)
data %>%
group_by(Province_State) %>%
summarise_at(vars(ends_with("20")), sum)
## A tibble: 58 x 78
# Province_State X1.22.20 X1.23.20 X1.24.20 X1.25.20 X1.26.20 X1.27.20 X1.28.20 X1.29.20 X1.30.20 X1.31.20 X2.1.20 X2.2.20 X2.3.20 X2.4.20
# <fct> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int> <int>
# 1 Alabama 0 0 0 0 0 0 0 0 0 0 0 0 0 0
# 2 Alaska 0 0 0 0 0 0 0 0 0 0 0 0 0 0
# 3 American Samoa 0 0 0 0 0 0 0 0 0 0 0 0 0 0
# 4 Arizona 0 0 0 0 1 1 1 1 1 1 1 1 1 1
# 5 Arkansas 0 0 0 0 0 0 0 0 0 0 0 0 0 0
# 6 California 0 0 0 0 2 2 2 2 2 3 3 3 6 6
推荐阅读
- python - 在 2 点之间移动一个矩形(或任何 kivy 图形)
- javascript - Jquery选择除标题以外的所有内容
- excel - Excel VBA - 比较两个范围并扩展新范围
- mysql - 如何处理超过 2 GB 的 mysql 表大小
- r - 如何在绘图上以相同的顺序关联聚类标签和树状图
- editor - Wagtail Draftail:将类添加到 div
- vue.js - 使用 vee-validate 在 vue js 中进行验证有错误
- javascript - OAuth2 授权代码授予流 Node.js 与客户端混合
- angular - 在 bsDatepicker 中提交表单后更改日期
- r - 如何重复列表可变次数