How about variation on the theme
>./\ 3 4 0 0 5 0 6 0 0 0 7
3 4 4 4 5 5 6 6 6 6 7
--- Dan Bron <[EMAIL PROTECTED]> wrote:
> Raul wrote:
> > drag=: {~ [EMAIL PROTECTED] >./\@:* ([EMAIL PROTECTED] 1{.0{.])
>
> Thank you; this is indeed faster; I've replaced my definition with
> yours. However, I was hoping for a solution that would complete in
> about half the time of the solutions I provided. That is, I'd like a
> 2x or 100% speedup; drag is only about 20% faster than drag0 on my
> dataset.
>
> Any other lines of attack?
>
> -Dan
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
____________________________________________________________________________________
Need a quick answer? Get one in minutes from people who know.
Ask your question on www.Answers.yahoo.com
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm