Dear list,
how can I write the following two lines in one function:
> Pox2 <- ave(lsk0t50$Pox2, lsk0t50$ProfN, Fun=is.na(lsk0t50$Pox2))
> Pox2 <- data.frame(Pox2)
The following does not work:
> Pox2 <- data.frame(Pox2 <- ave(lsk0t50$Pox2, lsk0t50$ProfN,
Fun=is.na(lsk0t50$Pox2)))
> names(Pox2)
[1]
"Pox2....ave.lsk0t50.Pox2..lsk0t50.ProfN..Fun...is.na.lsk0t50.Pox2.."
>
Regards, Ulrich
--
__________________________________________________
Ulrich Leopold MSc.
Department of Physical Geography
Institute for Biodiversity and Ecosystem Dynamics
Faculty of Science
University of Amsterdam
Nieuwe Achtergracht 166
NL-1018WV Amsterdam
Phone: +31-(0)20-525-7456 (7451 Secretary)
Fax: +31-(0)20-525-7431
Email: uleopold at science.uva.nl
http://www.frw.uva.nl/soil/Welcome.html
Check us also out at:
Netherlands Centre for Geo-ecological Research
http://www.frw.uva.nl/icg
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-help-request at
stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._
Hello Ulrich,
Monday, May 27, 2002, 5:36:14 PM, you wrote:
UL> Dear list,
UL> how can I write the following two lines in one function:
UL> > Pox2 <- ave(lsk0t50$Pox2, lsk0t50$ProfN,
Fun=is.na(lsk0t50$Pox2))
UL> > Pox2 <- data.frame(Pox2)
UL> The following does not work:
UL> > Pox2 <- data.frame(Pox2 <- ave(lsk0t50$Pox2, lsk0t50$ProfN,
UL> Fun=is.na(lsk0t50$Pox2)))
UL> > names(Pox2)
UL> [1]
"Pox2....ave.lsk0t50.Pox2..lsk0t50.ProfN..Fun...is.na.lsk0t50.Pox2.."
UL> >
UL> Regards, Ulrich
I don't know if you mean this:
f <- function(x,...,FUN){
y <- ave(x,...,FUN)
data.frame(y)
}
You can now use f() in the same way, like ave().
Or you can get rid of the names calling e.g.:
Pox2 <- structure(data.frame(ave(lsk0t50$Pox2,
lsk0t50$ProfN,Fun=is.na(lsk0t50$Pox2))), names="lsk0t50")
Why do you want a single numeric vector to be a data.frame anyway?
--
Best regards,
Michal mailto:bojaniss at poczta.onet.pl
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-help-request at
stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._