Tengo dos tablas y necesito actualizar los valores de columna pro_sales en la primera tabla desdepro_sales valores en el segundo.

df1 <- data.frame(storecode = c(100,100,100,200,200),
                  productcode = c(1,2,3,1,2), pro_sales = c(0,0,0,0,0))
df2 <- data.frame(storecode = c(100,100,200),
                  productcode = c(1,2,1), pro_sales = c(0,1,0))

Necesito unirme a la izquierda en las columnasstorecode yproductcode. A continuación debería estar mi mesa final:

  storecode productcode  pro_sales
1       100           1         0
2       100           2         1
3       100           3         0
4       200           1         0
5       200           2         0 

Pude dejar unirme en dplyr pero después de eso necesito ayuda por favor.

df1 %>%
  left_join(df2,c("storecode"="storecode","productcode"="productcode")) %>% 
  mutate( ???? ) %>%
  select(names, match, value = value.x)

Gracias