Я хочу проверить нормальность в R, мои данные выглядят так:

Я хочу сделать тест на нормальность для каждого стенограммы. Я использовал код как:
my_data <- read.csv("b.csv")
my_data
shapiro.test(my_data$t1)
Когда я делаю shapiro.test(my_data)
Error: is.numeric(x) is not TRUE
Это дало мне результат для t1
, аналогично, я хочу сделать для всех, как это сделать сразу?