Я пытаюсь написать t-тест для фрейма данных, который я создал из другого фрейма данных, но у меня возникли некоторые проблемы.Я получаю эту ошибку:
Error in if (stderr < 10 * .Machine$double.eps * max(abs(mx),
abs(my))) stop("data are essentially constant") :
missing value where TRUE/FALSE needed
In addition: Warning messages:
1: In mean.default(x) : argument is not numeric or logical:
returning NA
2: In mean.default(y) : argument is not numeric or logical:
returning NA
Это код, который я написал для нового кадра данных:
t_test_domain_1 <- data.frame(matrix(NA, nrow = 14, ncol = 4))
t_test_domain_1_col_names <- c("arm", "baseline", "6mo", "12mo")
colnames(t_test_domain_1) <- t_test_domain_1_col_names
t_test_domain_1[1:7, 2] <- newest.table_summary[2:8, 4]
t_test_domain_1[8:14, 2] <- newest.table_summary[2:8, 5]
t_test_domain_1[1:7,1] <- 1
t_test_domain_1[8:14,1] <- 0
t_test_domain_1[12,2] <- 0
И вот как выглядит t_test_domain_1:
t_test_domain_1
arm baseline 6mo 12mo
[1,] "1" "3.316" NA NA
[2,] "1" "3.158" NA NA
[3,] "1" "2.885" NA NA
[4,] "1" "3" NA NA
[5,] "1" "4" NA NA
[6,] "1" "3.259" NA NA
[7,] "1" "2.408" NA NA
[8,] "0" "3.341" NA NA
[9,] "0" "3.295" NA NA
[10,] "0" "2.852" NA NA
[11,] "0" "3.25" NA NA
[12,] "0" "0" NA NA
[13,] "0" "3.075" NA NA
[14,] "0" "2.418" NA NA
Затем я пытаюсь выполнить t-тест для базовых значений по руке, поэтому я пишу:
t.test(t_test_domain_1$baseline ~ t_test_domain_1$arm)
, но затем я получаюошибка выше.
help?