Error from name collisions in shapiro_test()

[ClaudiuPapasteri]

Hello,

Thank you for your wonderful packages. They are really appreciated.
I found that shapiro_test() throws an error if it is provided with column names "value" or "variable" as input.

Reproducible example:

data("selfesteem2", package = "datarium")

selfesteem2 <- selfesteem2 %>%
  gather(key = "time", value = "value", t1, t2, t3) %>%
  convert_as_factor(id, time)

selfesteem2 %>%
  group_by(treatment, time) %>%
  shapiro_test(value) 

Error: Column variable is unknown

data("selfesteem2", package = "datarium")

selfesteem2 <- selfesteem2 %>%
  gather(key = "time", value = "variable", t1, t2, t3) %>%
  convert_as_factor(id, time)

selfesteem2 %>%
  group_by(treatment, time) %>%
  shapiro_test(variable) 

Error: Result must have length 12, not 0

[Si-Thu-Thein]

Can confirm. It's a weird bug.

[kassambara]

fixe now, thanks

[kulbhushanchand]

Hi @kassambara, looks like the bug is still there. Can you kindly check this following example.
Example -

library(rstatix)

data <- data.frame(
  sub = c(1,2,3,4,5,6,7,8,9,10,11,12),
  baseline = c(25,27,23,25,24,20,19,24,15,20,23,21),
  intervention = c(10,7,12,11,15,18,11,10,13,8,9,8)
  )
  
my_data <- data %>%
  gather(key = "variable", value = "value",-sub)


my_data %>%
  group_by(variable) %>%
  shapiro_test(value)

Error -

Error: Problem with `mutate()` input `data`.
x Must group by variables found in `.data`.
* Column `variable` is not found.
i Input `data` is `map(.data$data, .f, ...)`.