Messages from Usenet group comp.lang.idl-pvwave, compiled by Paulo Penteado
Re: How to remove For..Endfor loops in these case?
"Sang-Heon Shim" <sangshim@princeton.edu> wrote in message news:38CED482.169291C8@princeton.edu... > pind=[0,1,2,3] > > for i=0,2 do a_new[*,pind,i] = replicate(1.0,ndata) # aa[pind*3+i] > > for i=ngauprm, nprm-1 do pder[*,i] = x[*]^float(i-ngauprm) ; make the exponent array iarr = findgen(nprm-ngauprm) ; extend x x = rebin(x,n_elements(x),nprm-ngauprm,/sample) ; do it! pder = x^iarr > > Thanks. > > -- Dan