comp.lang.idl-pvwave archive: archive

Home » Public Forums » archive » mean() function

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

Re: mean() function [message #46953 is a reply to message #46938]

Mon, 16 January 2006 00:01

Maarten[1]
Messages: 176
Registered: November 2005

Senior Member

I think that this comes close. I ignores infinite numbers on request.
Is it fast: no. But implementing the thing is C should be near trivial
if you have dealt with that before (I haven't, at least not in IDL).

function alt_mean, D, nan=nan
compile_opt defint32, strictarr, logical_predicate, strictarrsubs

M = 0.0

if keyword_set(nan) then begin
idx = where(finite(D), cnt)
if cnt gt 0 then begin
for ii=0,n_elements(idx) do $
M += (D[idx[ii]] - M)/(ii+1)
endif else begin
M = !values.d_nan
endelse
endif else begin
for ii=0,n_elements(D) do $
M += (D[ii] - M)/(ii+1)
endelse

return, M
end

Report message to a moderator

[Message index]

		mean() function By: biocpu on Tue, 10 January 2006 14:34
		Re: mean() function By: Foldy Lajos on Mon, 16 January 2006 02:27
		Re: mean() function By: Maarten[1] on Mon, 16 January 2006 00:01
		Re: mean() function By: Foldy Lajos on Sun, 15 January 2006 05:53
		Re: mean() function By: Maarten[1] on Fri, 13 January 2006 00:57
		Re: mean() function By: Kenneth P. Bowman on Thu, 12 January 2006 09:07

Previous Topic:	Re: mean() function
Next Topic:	ASP.NET vs JSF

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Fri Oct 10 03:08:34 PDT 2025

Total time taken to generate the page: 0.15304 seconds