load 'viewmat' ]B=:A*.|.A*.|.A=:-.(500+x)</|x=:i:500 ]P=:2 3$255 255 255 255 0 0 P viewmat BI couldn't resist making a "beginner's diamond.
Good luck with the cards. I'm looking forward to seeing wha you make. Linda -----Original Message----- From: Programming [mailto:[email protected]] On Behalf Of Brian Schott Sent: Tuesday, June 27, 2017 2:04 PM To: Programming forum <[email protected]> Subject: Re: [Jprogramming] cleanest diamond Marshall, There are 2 images in this "conversation": im1 and im2. If I apply your code for finding pairs of adjacent pixels on these 2 images I get the following results. Can you elaborate on the meaning and meaningfulness of the results below, please? $((}. ,.&, }:) , (}."1 ,.&, }:"1))im1 1504 2 freqcount=: (\: {:"1)@(~. ,. #/.~) freqcount((}. ,.&, }:) , (}."1 ,.&, }:"1))im1 NB. poor image 0 0 1034 1 1 302 1 0 84 0 1 84 freqcount((}. ,.&, }:) , (}."1 ,.&, }:"1))im2 NB. better image 0 0 962 1 1 450 1 0 46 0 1 46 Thank you, ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
