Dostałem ten błąd dla mojego kodu

Error in t.test.default(dat$Value, x[[i]][[2]]) : 
  not enough 'y' observations

Myślę, że powodem tego błędu jest to, że robię test t.test dla danych, które mają tylko jedną wartość (więc nie byłoby średniej lub sd) w porównaniu z danymi, które mają 20 wartości. obejdź to .. czy jest sposób, w jaki mogę zignorować dane, które nie mają wystarczającej liczby obserwacji? jak pętla if może działać ... pls help

Tak więc mój kod, który wykonuje test t.test

t<- lapply(1:length(x), function(i) t.test(dat$Value,x[[i]][[2]]))

gdzie x to dane w postaci cięć podobnych do

cut: [3:8)
        Number   Value
3       15        8
4       16        7
5       17        6
6       19        2.3
this data goes on 
cut:[9:14)
      Number   Value
7     21        15
cut:[13:18) etc
      Number    Value
8     22        49
9     23        15
10    24        13

Jak mogę zignorować „cięcia”, które mają w nich tylko 1 wartość, jak w przykładzie powyżej, gdzie w „cięciu [9:14]” jest tylko jedna wartość ....