Как использовать результаты теста в качестве входных данных для условного оператора - PullRequest
0 голосов
/ 31 декабря 2018

Я выполняю тест Шапиро-Уилка на нормальность по нескольким переменным и хочу представить p-значения для каждой переменной, а также утверждение, указывающее, следует ли отклонять нулевую гипотезу, в списке.

Я использую вывод p-значения из shapiro.test в качестве ввода в условный оператор, который оценивает значение p, чтобы определить, следует ли отклонить нулевое значение.

Ясупер новый для r, так что извиняюсь, если это глупый вопрос или если есть удивительный пакет, который делает это;Я попытался найти, но не повезло.Оцените помощь заранее.

x<-shapiro.test(variable1)$p
y<-shapiro.test(variable2)$p
z<-shapiro.test(variable3)$p

cat("p-values:\x:",x,if(x<0.05){print("Reject the null")}else{print("Do 
not reject the null")},"\y:",y,if(y<0.05){print("Reject the 
null")}else{print("Do not reject the null")},"\z:",z,if(z<0.05) 
{print("Reject the null")}else{print("Do not reject the null")})

Результаты включают три строки [1] "Отклонить ноль";Я не хочу, чтобы это отображалось, только бит p-values: onward.

Вот текущие результаты:

[1] "Reject the null"
[1] "Reject the null"
[1] "Reject the null"
 p-values:
x: 1.324e-06 Reject the null 
y: 7.333728e-15 Reject the null 
z: 6.673262e-20 Reject the null

Я бы хотел что-то вроде:

p-values:
x: 1.324e-06 Reject the null 
y: 7.333728e-15 Reject the null 
z: 6.673262e-20 Reject the null
...