Switch Help
If you want type twice commands in function aar, you could try this:
aar <-function(command) {
switch(command,
scrn = cat("scrn :Screening","\n"),
dx = cat("dx :Diagnosis","\n"),
df = cat("df :Don't Forget","\n"))
}
invisible(Vectorize(aar)(c('dx', 'df')))
On Wed, Nov 18, 2009 at 8:39 AM, oscar linares <winsaam at gmail.com> wrote:
Dear Rexperts,
Given,
aar <-function(command) {
switch(command,
?{scrn = cat("scrn ?:Screening","\n")}
?{dx ? = cat("dx ? ?:Diagnosis","\n")}
?{df ? = cat("df ? ?:Don't Forget","\n")}
)
}
I want to be able to do:
aar("dx") # function does cat("dx ? ?:Diagnosis","\n")
aar(c("dx","df")) ?# function does cat("dx ? ?:Diagnosis","\n")
? ? ? ? ? ? ? ? ? ? ? ?# function does df ? = cat("df ? ?:Don't
Forget","\n")
BUT IT IS NOT WORKING FOR ME.
Please help:-)
--
Oscar
Oscar A. Linares, MD
Translational Medicine Unit
LaPlaisance Bay, Bolles Harbor
Monroe, Michigan
? ? ? ?[[alternative HTML version deleted]]
______________________________________________ R-help at 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.
Henrique Dallazuanna Curitiba-Paran?-Brasil 25? 25' 40" S 49? 16' 22" O