组织数据集并对已编辑的数据进行排序

df <- read.csv ('https://raw.githubusercontent.com/ulklc/covid19- 
timeseries/master/countryReport/raw/rawReport.csv',
            stringsAsFactors = FALSE)

# I did wrong.
df11 <- aggregate(df$confirmed, by=list(df$countryName) subset(df,df$confirmed < df$recovered) , FUN 
== "max"))

国家内部 查找恢复数量已通过确认的日期。

作为输出;

day              countryName        confirmed     recovered 
2020/04/10         Spain              1500          1550
2020/01/19         italy              862            900
...

数据就是例子。不是真正的价值观。