Re: Identical elements
- To: mathgroup at smc.vnet.net
- Subject: [mg88412] Re: Identical elements
- From: "jwmerrill at gmail.com" <jwmerrill at gmail.com>
- Date: Mon, 5 May 2008 06:10:07 -0400 (EDT)
- References: <fvhe2h$3th$1@smc.vnet.net>
On May 3, 6:16 am, KFUPM <hussain.alqaht... at gmail.com> wrote:
> Dear All
>
> I have a list and i need to test whether all the elements in the list
> are identical or no. What is the efficient way to do that? The output
> should be true if all elements are the same and False otherwise. One
> line command is preferred if possible.
>
> Your help is highly appreciated.
>
> Regards,
>
> HMQ
There's probably a dozen ways to do this. In version six, there's
PatternSequence:
In[448]:= MatchQ[{q, q, q, q}, PatternSequence[_]]
Out[448]= True
Regards,
JM