Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2013

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: ImageTaker[img, {{x1,y1},{x2,y2}} ] useful toolfunction

  • To: mathgroup at smc.vnet.net
  • Subject: [mg130318] Re: ImageTaker[img, {{x1,y1},{x2,y2}} ] useful toolfunction
  • From: roby <roby.nowak at gmail.com>
  • Date: Tue, 2 Apr 2013 03:30:09 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net
  • References: <kj2bnf$m4u$1@smc.vnet.net> <kj66f6$ogu$1@smc.vnet.net>

Am Samstag, 30. M=E4rz 2013 09:07:02 UTC+1 schrieb roby:
> Just a little bit more compact version:
>
>
>
> ImageTaker[img_, c_] := ImageTake[img, Sequence @@ (
>
>     c // Transpose // Reverse // Sort /@ #& //
>
>      MapAt[First@ImageDimensions@img - Reverse@#&, #, 1]&)]
>
>
>
>
>
> Robert

Ok just, learned that starting with Mathematica 8

ImageTrim[]

does the miracle.

thx to Matthias Odisio

Robert



  • Prev by Date: Re: useful toolfunction
  • Next by Date: Re: IntegerPart
  • Previous by thread: Re: useful toolfunction
  • Next by thread: Re: Quit is grayed out in Mathematica 8.0.4