or perhaps length(unique(x))==1
-----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Patrick Burns Sent: Monday, August 29, 2005 5:22 PM To: [EMAIL PROTECTED] Cc: r-help@stat.math.ethz.ch Subject: Re: [R] Testing if all elements are equal in a vector/matrix How about diff(range(x)) < tolerance Patrick Burns [EMAIL PROTECTED] +44 (0)20 8525 0696 http://www.burns-stat.com (home of S Poetry and "A Guide for the Unwilling S User") Vincent Goulet wrote: >Is there a canonical way to check if all elements of a vector or matrix >are the same? Solutions below work, but look hackish to me. > > > >>x <- rep(1, 10) >>all(x == x[1]) # == operator does not provide for small differences >> >> >[1] TRUE > > >>isTRUE(all.equal(x, rep(x[1], length(x)))) # ugly >> >> >[1] TRUE > >Best, > >Vincent > > ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html