Estou buscando dados do IBGE (SIDRA):

    library(sidrar) 

    df <- get_sidra (api = "/t/1846/n1/all/v/all/p/all/c11255/90707/d/v585%200")
    #Selecionando as colunas que me interessa
    df1 <- df[,c(7,10,13)]

Isso me retorna a série histórica do PIB

    
    df1 <- Trimestre (Código)           Setores e subsetores           Valor
            199601                      PIB a preço de mercado         189323
            ...                             ...                         ...
            201903                      PIB a preço de mercado         1842700
            201904                      PIB a preço de mercado         1842740

E salvo este arquivo no meu computador

    read.xlsx("df1.xlsx", sheetName = "PIB", header = TRUE)

Ao sair um novo dado, 202001, o IBGE revisa 3 dados anteriores (201902, 201903, 201904) e divulga o 202001,

então rodo apenas o código para buscar os 4 últimos dados, para evitar ter que buscar a série completa

    df2 <- get_sidra (api = "/t/1846/n1/all/v/all/p/last%203/c11255/90707/d/v585%200")

Após ter o meu df2, quero dar update nos dados de 201902, 201903 e 201904, e adicionar os dados de 202001

Para adicionar apenas o novo dado, estava utilizando :

    wb <- loadWorkbook("df1.xlsx")
    addDataFrame(df2,getSheets(wb)$df2,  col.names = FALSE, row.names = FALSE, startRow = nrow(read.xlsx("df1.xlsx", sheetName = "PIB"))+2)
    saveWorkbook(wb,"df1.xlsx")

Mas essa função não me ajuda a dar update nas informações anteriores. Alguém poderia me dizer de qual maneira consigo fazer isso?