Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

FW: Question on Ordering

  • To: mathgroup at smc.vnet.net
  • Subject: [mg47008] FW: Question on Ordering
  • From: "Owen, HL (Hywel)" <H.L.Owen at dl.ac.uk>
  • Date: Sat, 20 Mar 2004 03:50:21 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

I've answered my own question! Kind of obvious really, if you use the
function Normalise:

Normalise[list_]:=((list-#)/(Max[list]-#))&[Min[list]]

which converts any list into a set of values from zero to one.

Then the plot can be done using:

{Hue[#] & /@ Normalise[B], Point[#] & /@ Transpose[{A,B}]}
//Transpose//Graphics//Show

Unless there's a simpler method?

Hywel

> -----Original Message-----
> From: Owen, HL (Hywel) 
To: mathgroup at smc.vnet.net
> Sent: 19 March 2004 11:54
> To: mathgroup at smc.vnet.net
> Subject: [mg47008] Question on Ordering
> 
> 
> I have two sets of data A and B of the same length, that I'd 
> like to plot one against the other - this is easy of course:
> 
> ListPlot[Transpose[{A,B}]
> 
> What I'd like to do next is to colour each point according to 
> the value of B (or A in principle). The points are easily 
> generated using:
> 
> Point[#]&/@Transpose[{A,B}]
> 
> And if I have a list of colours C I can do something like
> 
> {Hue[#]&/@C,Point[#]&/@Transpose[{A,B}]}//Transpose//Graphics//Show
> 
> The question is how to generate the list of colours C. Note 
> that I don't want to sort A and B, since I want to leave them 
> alone to plot {A,D}, {A,E} later on.
> 
> I tried various combinations of Ordering[] and Position[] but 
> didn't get anywhere. Anyone have any idea?
> 
> Thanks,
> 
> Hywel
> 
> -------------------------------------------------------------------
> Hywel Owen                                      h.owen'at'dl.ac.uk
> Accelerator Science and Technology Centre
> Daresbury Laboratory, Warrington WA4 4AD, UK
> Tel: +44 1925 603797 Fax: +44 1925 603192
> -------------------------------------------------------------------
> This email is confidential. If you have received this email 
> in error, you are in notice of its status.
> Please notify the sender immediately by reply e-mail and then 
> delete this message from your system. Please do not copy or 
> use it for any purposes, or disclose its contents to any 
> other person: to do so could be a breach of confidence.
> Thank you for your co-operation.
> 
> If this message contains information that you have requested 
> from us please see our standard notice for details of how you 
> may use that information. If the notice is not attached and 
> you require a copy please contact the FoI Officer by emailing 
> FOI-Officer at cclrc.ac.uk <mailto:FOI-Officer at cclrc.ac.uk> or 
> visit our web site <http://www.foi.cclrc.ac.uk>, 
> 
> Any views expressed in this message are those of the 
> individual sender and may not necessarily reflect the views of CCLRC.
> -----------------------------------------------------------------
> 
> 


  • Prev by Date: Manipulating the Front End
  • Next by Date: RE: RE: Re: doing things on a procedural way and doing them on a functional way
  • Previous by thread: Question on Ordering
  • Next by thread: Re: FW: Question on Ordering