Perhaps you are looking for this?
if () {
## whatever
} else if () {
## whatever
} else if () {
## whatever
} else {
cat('none of the conditions was met\n')
}
Suggestion: study this example to see that your first if() condition is
more complicated than necessary
> if (identical(1,1) == 'TRUE') cat('what\n')
what
> if (identical(1,1)) cat('what\n')
what
-Don
--
Don MacQueen
Lawrence Livermore National Laboratory
7000 East Ave., L-627
Livermore, CA 94550
925-423-1062
On 8/13/12 10:54 PM, "Sri krishna Devarayalu Balanagu"
<balanagudevaray...@gvkbio.com> wrote:
>key1.=c(1, 2, 3)
>key2.=c(2)
>
>if (identical(key1.,key2.) == "TRUE") {
>
> cat("No Errors found")
> }
>
>if (length(setdiff(key1., key2.)) !=0) {
>
> cat("Reference.ID_Trial.ID_Arm.ID_SubArm.ID\n\n")
>
> cat(paste(setdiff(key1., key2.)), sep="\n")
>
> cat("Error Message: The above value is not found in key2.\n\n")
> }
>if (length(setdiff(key2., key1.)) !=0) {
>
> cat("Reference.ID_Trial.ID_Arm.ID_SubArm.ID\n\n")
>
> cat(paste(setdiff(key2., key1.)), sep="\n")
>
> cat("Error Message: The above value is not found in key1.\n\n")
> }
>________________________________
>Notice: The information contained in this electronic mail message is
>intended only for the use of the designated recipient. This message is
>privileged and confidential. and the property of GVK BIO or its
>affiliates and subsidiaries. If the reader of this message is not the
>intended recipient or an agent responsible for delivering it to the
>intended recipient, you are hereby notified that you have received this
>message in error and that any review, dissemination, distribution, or
>copying of this message is strictly prohibited. If you have received this
>communication in error, please notify us immediately by telephone
>+91-40-66929999<tel:%2B91-40-66929999> and destroy any and all copies of
>this message in your possession (whether hard copies or electronically
>stored copies).
>
> [[alternative HTML version deleted]]
>
>______________________________________________
>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.
