Displaying 1 result from an estimated 1 matches for "p_kruskal".
Did you mean:
kruskal
2013 Apr 15
1
Kruskal-Wallis
...and put things together. Any help would be appreciated.
myFile <- data.frame(Sample_1a = 1:10, Sample_1b = 2:11, Sample_1c = 3:12,
Sample_2a=4:13, Sample_2b=7:16, row.names=LETTERS[1:10])
groups <- rep (0:1, c(3,2))
kruskal <- apply(myFile [1:nrow(myFile),], 1, kruskal.test, ******)
p_kruskal <- sapply(kruskal, function(x) x$p.value)
Thanks,
Chintanu
[[alternative HTML version deleted]]