This is my previous question :
Long to wider format
I tried this code for the entire dataset:
mutate(across(-ACCT,~as.character(.))) %>%