> tmp <- "VariablePAR            Plot1            Plot2
Plot3            Plot4
+ ParasiteA            3            1            1            4
+ ParasiteB            1            2            3            5
+ ParasiteC            2            1            1            3
+ ParasiteD            2            1            1            4
+ ParasiteE            4            1            1            1"
> para <- read.table(textConnection(tmp), row.names=1, header=TRUE)
> para
          Plot1 Plot2 Plot3 Plot4
ParasiteA     3     1     1     4
ParasiteB     1     2     3     5
ParasiteC     2     1     1     3
ParasiteD     2     1     1     4
ParasiteE     4     1     1     1
> apply(para >= 4, 2, any)
Plot1 Plot2 Plot3 Plot4
 TRUE FALSE FALSE  TRUE
>
>
>
Rich

	[[alternative HTML version deleted]]

