search for: bagmod

...<-bag[bag!=3] and repeat the which.max stuff. I came up with the following command to find the actual magnitude of the mode: Rgames> table(bag)->tbag Rgames> tbag bag 1 2 3 4 5 6 7 8 9 10 3 5 8 3 3 8 2 8 5 5 Rgames> tbag[dimnames(tbag)$bag=="3"]->bagmode Rgames> bagmode 3 8 Related to this, since bag2 is now bereft of threes, Rgames> table(bag2) bag2 1 2 4 5 6 7 8 9 10 3 5 3 3 8 2 8 5 5 I was able to make the same table with Rgames> newtable<-tbag[c(dimnames(tbag)$bag)!="3"] Rgames> newtable bag 1...