Create a matrix symmetric from long table in r

Question

This is my data

df <- data.frame (Var1  <- c("a", "b", "c","d","e","b","c","d&quo