G'day Maja, On Thu, 10 Mar 2011 11:44:28 -0800 (PST) maiya <maja.zaloz...@gmail.com> wrote:
> Aaah, it truly is wonderful, this technology! > I guess I'm going to have to override it a bit though.. > Along the lines of > > tae <- ifesle(all.equal(obs, exp) == TRUE, 0, sum(abs(obs - exp))) Please read the help page on all.equal(). As all.equal() tries to report the difference between the objects, if one exists, one should not compare the result from all.equal directly to TRUE. HTH. Cheers, Berwin ========================== Full address ============================ A/Prof Berwin A Turlach Tel.: +61 (8) 6488 3338 (secr) School of Maths and Stats (M019) +61 (8) 6488 3383 (self) The University of Western Australia FAX : +61 (8) 6488 1028 35 Stirling Highway Crawley WA 6009 e-mail: ber...@maths.uwa.edu.au Australia http://www.maths.uwa.edu.au/~berwin ______________________________________________ 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.