# 3. Data transform----
# 3.1. Insertar nueva(s) fila(s)----
nuevos <- data.frame(Equipo = "Villarreal", PJ = 29, PG = 13, PE = 5, PP = 11,
                     GF = 46, GC = 38, Pts. = 44)
clasLiga %>%
  rows_insert(nuevos)

# rows_insert() fallara si intentamos introducir una fila ya existente

# 3.2. Actualizar fila(s)----
clasLiga %>%
  rows_update(data.frame(Equipo = "R. Sociedad", Pts. = 60))

clasLiga %>%
  rows_update(data.frame(Equipo = "Real Sociedad", Pts. = 60))

# 3.3. Actualizar solo los valores NA----
clasLiga %>% 
  rows_patch(data.frame(Equipo = c("Barcelona","Atlético", 
                                   "Real Madrid", "Sevilla"),
                        Dest. = "Champions"))

# 3.4. Actualizar o insertar fila(s)----
clasLiga %>% 
  rows_upsert(data.frame(Equipo = "R. Sociedad", Pts. = 60)) %>%
  rows_upsert(data.frame(Equipo = "Villarreal", Pts. = 44))

# 3.5. Eliminar fila(s)----
clasLiga %>% 
  rows_delete(data.frame(Equipo = "R. Sociedad")) %>%
  rows_delete(data.frame(Equipo = "Getafe"))

# 4. Workspace clean----
rm(clasLiga)