Encadeando expressões do data.table

Manipulação de dados com data.table em R

Matt Dowle, Arun Srinivasan

Instructors, DataCamp

Encadeando expressões

Expressões do data.table podem ser encadeadas, ou seja, x[...][...][...]

step_1 <- batrips[duration > 3600]
step_2 <- step_1[duration > 3600][order(duration)]
step_2[1:3]

# Igual a
batrips[duration > 3600]

batrips[duration > 3600][order(duration)]

batrips[duration > 3600][order(duration)][1:3]

trip_id duration          
 295912 3601     
 347471 3602     
 536050 3602

Encadeando expressões

# Três estações de início com a menor duração média
step_1 <- batrips[, .(mn_dur = mean(duration)), by = "start_station"]
step_2 <- step_1[order(mn_dur)]
step_2[1:3]

# Três estações de início com a menor duração média
batrips[, .(mn_dur = mean(duration)),  
        by = "start_station"][order(mn_dur)][1:3]

                                 start_station   mn_dur
                                 2nd at Folsom 551.0807
 Temporary Transbay Terminal (Howard at Beale) 655.8563
                             2nd at South Park 697.7034

uniqueN()

uniqueN() é uma função auxiliar que retorna um inteiro com a contagem de valores únicos no objeto de entrada
Aceita vetores, data.frames e data.tables.

id <- c(1, 2, 2, 1)
uniqueN(id)

x <- data.table(id, val = 1:4)

uniqueN(x)

uniqueN(x, by = "id")

uniqueN() com by

Calcule o total de ids de bicicleta únicos por mês

ans <- batrips[, uniqueN(bike_id), by = month(start_date)]
head(ans, 3)

 month    V1   ## <~~ auto naming of cols
     1   605
     2   608
     3   631

Vamos praticar!

Manipulação de dados com data.table em R