Eric ¿Que dataset utilizo? Por curiosidad probé su código, pero me salen errores. Copio y pego todo como me sale en la consola.
> # https://raw.githubusercontent.com/datasets/covid-19/master/data/time-series-19-covid-combined.csv > datos <- read.csv("C:/Users/HP/Downloads/time-series-19-covid-combined.csv") > > library(data.table) > library(ggplot2) > library(anytime) > > df <-datos > > df[, fec:=anytime(fec)] Error in `:=`(fec, anytime(fec)) : Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":="). > setkey(df,com,fec) Error in setkeyv(x, cols, verbose = verbose, physical = physical) : x is not a data.table > > # newc: son los nuevos casos > df[, newc:=ct - shift(ct), by=.(com)] Error in `[.data.frame`(df, , `:=`(newc, ct - shift(ct)), by = .(com)) : unused argument (by = .(com)) > > # tasa: es la tasa de cambio que calculé así (ct2 - ct1)/ct1 > > df[, tasa:=newc/ct, by=.(com)] Error in `[.data.frame`(df, , `:=`(tasa, newc/ct), by = .(com)) : unused argument (by = .(com)) El dom., 22 mar. 2020 a las 16:52, neo (<ericconchamu...@gmail.com>) escribió: > Hola Javier, yo lo hice de la siguiente forma: > > library(data.table) > library(ggplot2) > library(anytime) > > df <- fread("/home/neo/Desktop/rhelp/spain.csv") > df[, fec:=anytime(fec)] > setkey(df,com,fec) > > # newc: son los nuevos casos > df[, newc:=ct - shift(ct), by=.(com)] > > # tasa: es la tasa de cambio que calculé así (ct2 - ct1)/ct1 > > df[, tasa:=newc/ct, by=.(com)] > > > y obtuve lo siguiente: > > > fec com pob ct newc tasa > 1: 2020-04-02 23:00:00 Andalucía 8414240 13 NA NA > 2: 2020-05-02 23:00:00 Andalucía 8414240 12 -1 -0.08333333 > 3: 2020-06-02 23:00:00 Andalucía 8414240 21 9 0.42857143 > 4: 2020-04-02 23:00:00 Aragón 1319291 0 NA NA > 5: 2020-05-02 23:00:00 Aragón 1319291 1 1 1.00000000 > 6: 2020-06-02 23:00:00 Aragón 1319291 6 5 0.83333333 > 7: 2020-04-02 23:00:00 Asturias 1022800 2 NA NA > 8: 2020-05-02 23:00:00 Asturias 1022800 5 3 0.60000000 > 9: 2020-06-02 23:00:00 Asturias 1022800 5 0 0.00000000 > > Espero que te sirva. > > Saludos !! > > Eric. > > > > > On 21-03-20 14:42, Javier Gómez Gonzalez wrote: > > Hola: > > > > Tengo los datos diarios del número de casos de coronavirus por > comunidades > > autónomas y quiero calcular el número diario de nuevos casos y la tasa > > diaria de variación del número de casos y no se como hacerlo en R. > > > > *fecha* > > > > *comunidad* > > > > *poblacion* > > > > *casos_totales* > > > > 04/03/2020 > > > > Andalucía > > > > 8414240 > > > > 13 > > > > 05/03/2020 > > > > Andalucía > > > > 8414240 > > > > 12 > > > > 06/03/2020 > > > > Andalucía > > > > 8414240 > > > > 21 > > > > 04/03/2020 > > > > Aragón > > > > 1319291 > > > > 0 > > > > 05/03/2020 > > > > Aragón > > > > 1319291 > > > > 1 > > > > 06/03/2020 > > > > Aragón > > > > 1319291 > > > > 6 > > > > 04/03/2020 > > > > Asturias > > > > 1022800 > > > > 2 > > > > 05/03/2020 > > > > Asturias > > > > 1022800 > > > > 5 > > > > 06/03/2020 > > > > Asturias > > > > 1022800 > > > > 5 > > > > Gracias > > > > [[alternative HTML version deleted]] > > > > _______________________________________________ > > R-help-es mailing list > > R-help-es@r-project.org > > https://stat.ethz.ch/mailman/listinfo/r-help-es > > [[alternative HTML version deleted]] > > _______________________________________________ > R-help-es mailing list > R-help-es@r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es > [[alternative HTML version deleted]] _______________________________________________ R-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es