Re: Segregating the elements of a list based on given lower and upper bounds
- To: mathgroup at smc.vnet.net
- Subject: [mg77314] Re: [mg77205] Segregating the elements of a list based on given lower and upper bounds
- From: "R.G" <gobiithasan at yahoo.com.my>
- Date: Wed, 6 Jun 2007 07:29:30 -0400 (EDT)
Hi DrMajorBob, Excellent piece of code! Thanks!
R.G
--- DrMajorBob <drmajorbob at bigfoot.com> wrote:
> Clear[inbounds]
> inbounds[{low_?NumericQ, high_?NumericQ}][x_?NumericQ] :=
> low <= x <= high
> inbounds[{low_?NumericQ, high_?NumericQ}, x_List] :=
> Select[x, inbounds[{low, high}]]
> inbounds[x_List, y_List] := inbounds[#, x] & /@ y
> Length /@ inbounds[a, b]
>
> {1, 1, 0, 1, 2}
>
> Bobby
>
> On Tue, 05 Jun 2007 05:58:10 -0500, R.G <gobiithasan at yahoo.com.my>
> wrote:
>
> > Hi Mathgroup members,
> >
> > Say, I have a list with the following elements:
> >
> > A={6.32553, 7.09956, 8.56784, 16.1871, 15.3989, 17.2285, 7.40711, \
> > 14.8876, 19.9068, 10.0834}
> >
> > and I have the following list with each {xvalue, yvalue}={lower
> bound,
> > upper bound}:
> > B={{0, 7}, {8, 10}, {11, 12}, {13, 15}, {16, 18}}
> >
> > How can I segregate values in A according to lower bound and upper
> > bound from B and find the number number of occurrence ?For example:
> > {0,7}={6.32553}, thus the number of occurrence is 1.
> > {8, 10}={7.09956,7.40711,8.56784}, the number of occurrence is 3.
> > {11,12}=None, the number of occurrence is 0.
> >
> > The code should be able work for any number Length[A] and
> Length[B].
> > Any suggestion please?
> > Thank you,
> > R.G
> >
> >
> >
>
>
>
> --
> DrMajorBob at bigfoot.com
>
Send instant messages to your online friends http://uk.messenger.yahoo.com