comp.lang.idl-pvwave archive: archive » Re: Fast Implementation

Home » Public Forums » archive » Re: Fast Implementation

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: Fast Implementation [message #31414 is a reply to message #31413]

Fri, 05 July 2002 10:06

David Fanning
Messages: 11724
Registered: August 2001

Senior Member

David Fanning (david@dfanning.com) writes:

> If you normalize your quadrant to 1, and take a bin size
> of 0.5, then a Histogram would give you the answer in, oh,
> 0.00005 seconds. :-)

Sorry, I was busy before. Here is an example of what I
mean:

***********************************************
PRO Example

; Find out how many points are in each quadrant
; of a 2D space given by the max and min of the
; data.

x = (randomu(seed, 1000) - 0.5) * 100
y = (randomu(seed, 1000) - 0.5) * 100
Plot, x, y, /NoData
Oplot, x, y, Psym=4

xx = Scale_Vector(x, 0, 0.9999999)
yy = Scale_Vector(y, 0, 0.9999999)
result = Hist_2D(xx, yy, Bin1 = 0.5, Bin2=0.5, $
Min1=0, Max1=1.0, Min2=0, Max2=1.0)
print, result[0:1, 0:1]
END
*************************************************

You can find the Scale_Vector program on my web page:

http://www.dfanning.com/programs/scale_vector.pro

Cheers,

David

--
David W. Fanning, Ph.D.
Fanning Software Consulting, Inc.
Phone: 970-221-0438, E-mail: david@dfanning.com
Coyote's Guide to IDL Programming: http://www.dfanning.com/
Toll-Free IDL Book Orders: 1-888-461-0155

Report message to a moderator

[Message index]

		Re: Fast Implementation By: Sven Geier on Tue, 09 July 2002 14:58
		Re: Fast Implementation By: Sven Geier on Tue, 09 July 2002 14:45
		Re: Fast Implementation By: Dick Jackson on Fri, 05 July 2002 10:48
		Re: Fast Implementation By: Pavel A. Romashkin on Fri, 05 July 2002 10:06
		Re: Fast Implementation By: David Fanning on Fri, 05 July 2002 10:06
		Re: Fast Implementation By: David Fanning on Fri, 05 July 2002 09:22

Previous Topic:	making an 3d oblique plane a volume (was structure use)
Next Topic:	Re: map projection question

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Thu Oct 09 21:09:15 PDT 2025

Total time taken to generate the page: 0.12665 seconds