On Aug 20, 2010, at 1:53 PM, Laetitia Schmid wrote:
Hi Richard,
thank you very much. I got the results I needed. But I am still
interested to find out how it would work with a if-else function in
this context.
lapply(para, function(x) if (max(x) >= 4 ){1} else {0})
--
David
Best,
Laetitia
Am 20.08.2010 um 23:40 schrieb RICHARD M. HEIBERGER:
> 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
Hi R people!
I am looking for some suggestions writing an if-else function.
The idea is to characterize different plots containing counts of
variables (here parasites). If a plot has a count equal or higher than
4 for any parasite the function should return a 1 else a 0. Later I
can loop the function over all plots.
Here I have a little subset of my data:
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
The function should give a 1 for plots 1 and 4 and a 0 for plots 2 and
3.
Your help is very much appreciated,
Laetitia
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
