Another try to be improved. s=: adverb define : s=. y,~ m {.x f=. x, (1-m){.y mean f,:s )
mean=: +/ % # (i. 5) 3 s 2* i. 4 0 1 2 1.5 3 4 6 On Wed, May 30, 2012 at 12:17 PM, Ben Gorte - LR <b.g.h.go...@tudelft.nl> wrote: > According to me the two images have different sizes and are partly > overlapping. > In the resulting image, he wants a copy of either image where they don't > overlap, and the average where they do. > > Like: > i1 =: 0 1 2 3 4 _ _ > i2 =: _ _ _ 0 2 4 6 > > I can come up with: > avg =: +/ % # > min =: <./ > ({"0 1~ (_={."1) )(avg ,. min)i1,:i2 > 0 1 2 1.5 3 4 6 > > but I'm sure that can be improved. > > Ben > ________________________________________ -- (B=) ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm