Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2003
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2003

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

Search the Archive

Re: Re: Showing thick lines - a problem?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg39516] Re: [mg39502] Re: [mg39484] Showing thick lines - a problem?
  • From: "Mihajlo Vanevic" <mvane at eunet.yu>
  • Date: Fri, 21 Feb 2003 04:07:38 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

Thickness is not working "as expected"!!

Make your own thickness function (with Polygon)
and all short-lines will be visible.


sl1[len_, size_] := 
    Show[Graphics[{RGBColor[0, 0, 1], 
          Polygon[{{0, 0}, {len, 0}, {len, .1}, {0, .1}}], 
          Polygon[{{0, 1}, {1, 1}, {1, 1.1}, {0, 1.1}}]}], ImageSize -> size, 
      AspectRatio -> 1/10, PlotRange -> All];

Table[sl1[1/th, s], {th, 100, 2000, 100}, {s, 400, 600, 25}]

Regards,				 
         Mihajlo Vanevic
         mvane at EUnet.yu
         2003-02-20

**************************************************************
*    At 2003-02-20, 05:13:00 
*        Uri Zwick, zwick at tau.ac.il  wrote:
**************************************************************
>David Park wrote:
>
>>Uri,
>>
>>Add the option PlotRange -> All. Otherwise Mathematica shows what it thinks
>>is "the most interesting" part of the plot, which might not be what you
>>intend.
>>
>>David Park
>>djmp at earthlink.net
>>http://home.earthlink.net/~djmp/
>>
>This doesn't solve the problem, I am afraid.
>But it does lead to another strange situation:
>
>My original definition was:
>
>sl[len_,size_] :=
>  Show[ Graphics[ {RGBColor[0,0,1],Thickness[0.01],Line[{{0,0},{len,0}}],
>        Line[{{0,1},{1,1}}]}],ImageSize->size,AspectRatio->1/10]
>
>Let us also define
>
>sl1[len_,size_] :=
>  Show[ Graphics[ {RGBColor[0,0,1],Thickness[0.01],Line[{{0,0},{len,0}}],
>        Line[{{0,1},{1,1}}]}],ImageSize->size,AspectRatio->1/10,
>        PlotRange->All]
>
>Then, sl[1/1000,450] shows both lines, while sl1[1/1000,450]
>shows only the long one. (With PlotRange->All we see less things!)
>
>Again we have a "non-monotonicity":
>sl1[1/1000,500] shows the two lines, while 
>sl1[1/1000,550] shows only the long line, even though
>the image is larger.
>
>The problem arises because the short line is very very short,
>and should therefore be barely visible, and not because it is
>out of the plot range.
>
>If possible, it would be desriable to have a "monotonicity"
>property that says that if Mathematica thinks that an object
>is large enough to be seen at a given image size, this object
>should also be seen at all larger image sizes. It is very 
>confusing to have objects disapper when an image is enlarged!
>
>Best regards,
>
>Uri
> 
>
>>From: Uri Zwick [mailto:zwick at tau.ac.il]
To: mathgroup at smc.vnet.net
>To: mathgroup at smc.vnet.net
>>
>>Hi,
>>
>>The following draws two thick blue lines, one of length 1
>>and the other of length "len" using an image size of "size":
>>
>>sl[len_,size_] :=
>>  Show[ Graphics[ {RGBColor[0,0,1],Thickness[0.01],Line[{{0,0},{len,0}}],
>>        Line[{{0,1},{1,1}}]}],ImageSize->size,AspectRatio->1/10]
>>
>>On my machine:
>>
>>sl[1/1000,450]
>>
>>Shows a long thick line and
>>a very short thick line underneath it.
>>
>>sl[1/1000,500]
>>
>>Only the long line is visible, even tough the image is larger!
>>
>>sl[1/1000,600]
>>
>>The short line reappears.
>>
>>The problem disappears when "Thickness[0.01]" is removed.
>>
>>Do others have the same problem?
>>
>>I would expect larger images to show more, and not less, details.
>>Also, it seems to me that thick lines should be visible whenever
>>thin lines are.
>>
>>Uri
>>
>>  
>>
**************************************************************






  • Prev by Date: Re: Finding the closest number from a list
  • Next by Date: RE: Finding the closest number from a list
  • Previous by thread: Re: Showing thick lines - a problem?
  • Next by thread: ConstrainedMin: "assertion failed at "\[InvisibleSpace]" after perturbation steplength > 0"