Почему объекты R не печатаются в функции или цикле «for»?

У меня есть матрица R с именем ddd. Когда я ввожу это, все работает нормально:

i <- 1
shapiro.test(ddd[,y])
ad.test(ddd[,y]) 
stem(ddd[,y]) 
print(y) 

Вызовы Шапиро Уилка, Андерсона Дарлинга и ствол все работают и извлекают тот же столбец.

Если я помещаю этот код в цикл «for», вызовы Шапиро Уилк и Андерсон Дарлинг перестают работать, в то время как вызовы стебля и листа и вызов печати продолжают работать.

for (y in 7:10) {
    shapiro.test(ddd[,y])
    ad.test(ddd[,y]) 
    stem(ddd[,y]) 
    print(y)
}

The decimal point is 1 digit(s) to the right of the |

  0 | 0
  0 | 899999
  1 | 0

[1] 7

То же самое происходит, если я пытаюсь написать функцию. ПО и AD не работают. Остальные звонки делают.

> D <- function (y) {
+ shapiro.test(ddd[,y])
+ ad.test(ddd[,y]) 
+ stem(ddd[,y]) 
+ print(y)  }

> D(9)

  The decimal point is at the |

   9 | 000
   9 | 
  10 | 00000

[1] 9

Почему не все вызовы ведут себя одинаково?