I am trying to write a function to run a shapiro test for multiple columns in my data frame. I tried using the following code but it keeps returning this error. I have made sure