comp.lang.idl-pvwave archive
Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado

Home » Public Forums » archive » Re: help with data points of contour.
Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend 
Return to the default flat view Create a new topic Submit Reply
Re: help with data points of contour. [message #16904] Wed, 25 August 1999 00:00 Go to previous message
Nando Iavarone is currently offline  Nando Iavarone
Messages: 48
Registered: December 1998
Member
<HTML>
Peter Brooker wrote:
<BLOCKQUOTE TYPE=CITE>Consider the following simple program.

<P>nn=101
<BR>x=findgen(nn)-(nn-1.)/2.
<BR>y=x
<BR>z=fltarr(nn,nn)
<BR>for i=0,(nn-1) do begin
<BR>for j=0,(nn-1) do begin
<BR>&nbsp;&nbsp; z(i,j)=sqrt(x(i)^2+y(j)^2)
<BR>&nbsp;&nbsp; endfor
<BR>&nbsp;&nbsp; endfor
<BR>contour,z,x,y,levels=[10,20,30,40]
<BR>end</BLOCKQUOTE>
a question.why do you use loop?
<BR>&nbsp;I use the technique:

<P>pro test

<P>&nbsp;&nbsp;&nbsp; nn=101

<P>&nbsp;&nbsp;&nbsp; x = findgen(nn)-(nn-1.)/2.
<BR>&nbsp;&nbsp;&nbsp; y = x
<BR>&nbsp;&nbsp;&nbsp; x = x#replicate(1,nn)
<BR>&nbsp;&nbsp;&nbsp; y = replicate(1,nn)#y

<P>&nbsp;&nbsp;&nbsp; z = sqrt(x^2+y^2)
<BR>&nbsp;
<BR>end

<P>don't you think it is more readeble and maybe, I didn't test it, quicker?
<BR>&nbsp;
<BLOCKQUOTE TYPE=CITE>I now want to determine the x,y data points that
form the z=20 contour.</BLOCKQUOTE>
I think that if you are interested only in discrete value of your coordinate,it
is sufficient to do:

<P>index&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; = where(z eq 20)
<BR>x_index&nbsp; =&nbsp; index mod nn
<BR>y_index&nbsp; =&nbsp; index / nn
<BR>print, x_index, y_index

<P>bye.
<PRE>--&nbsp;
Nando Iavarone
Advanced Computer System - SPACE DIVISION
via Lazzaro Belli, 23
00040&nbsp; Frascati - RM
Tel: +39-6-944091 (switchboard)
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; 9440968 (direct)
E-mail:&nbsp;
&nbsp;&nbsp;&nbsp; f.iavarone@acsys.it
&nbsp;&nbsp;&nbsp; FrdndVrn@altavista.net</PRE>
&nbsp;</HTML>
[Message index]
 
Read Message
Read Message
Previous Topic: Re: VIP
Next Topic: Rebin fails for UInt image on PowerMac

-=] Back to Top [=-
[ Syndicate this forum (XML) ] [ RSS ] [ PDF ]

Current Time: Wed Oct 08 19:59:26 PDT 2025

Total time taken to generate the page: 0.00400 seconds