MathGroup Archive 2003

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

Search the Archive

RE: Showing thick lines - a problem?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg39511] RE: [mg39484] Showing thick lines - a problem?
  • From: "Wolf, Hartmut" <Hartmut.Wolf at t-systems.com>
  • Date: Thu, 20 Feb 2003 05:15:06 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Uri,

Also, with...

sl[len_, size_, opts___] := 
  Show[Graphics[{RGBColor[0, 0, 1], Thickness[0.01], Line[{{0, 0}, {len,
0}}],
         Line[{{0, 1}, {1, 1}}], Line[{{1 - len, 0}, {1, 0}}]}], 
    ImageSize -> size, AspectRatio -> 1/10, Background -> Hue[.16, .1, 1], 
    opts]

...look at:

sl[.001, #] & /@ Range[400, 700, 50]
sl[.001, #, Frame -> None] & /@ Range[400, 700, 50]
sl[.001, #, PlotRange -> All] & /@ Range[400, 700, 50]
sl[.001, #, PlotRegion -> {{0, 1}, {0, 1}}] & /@ Range[400, 700, 50]
sl[.001, #, PlotRegion -> {{0.1, .9}, {0.1, .9}}] & /@ Range[400, 700, 50]

They are all different. The last one (which should be different only as to
its relation to background) is best, but still not perfect. A short
Inspection of the PostScript generated with Display shows the errors already
being present there. My # is: &

$Version
"4.1 for Microsoft Windows (November 2, 2000)"

All this has the appearance of a piece of software overworked through years
of maintenance and time might have come to completely redo it from scratch.
The only reason, I would attribute to WRI, to not have done that already --
I wish to guess -- is to have something very ambitious in the pipe. Awaiting
eagerly! If not, reconsidering, it's just: Mathematica-users have become problem
solvers, swiftly finding there way around all those nasty obstacles, to get
at the real thing!

--
Hartmut Wolf


>-----Original Message-----
>From: Uri Zwick [mailto:zwick at tau.ac.il]
To: mathgroup at smc.vnet.net
>Sent: Wednesday, February 19, 2003 10:42 AM
>To: mathgroup at smc.vnet.net
>Subject: [mg39511] [mg39484] Showing thick lines - a problem?
>
>
>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: RE: Simplify a module
  • Next by Date: Re: Showing thick lines - a problem?
  • Previous by thread: RE: Showing thick lines - a problem?
  • Next by thread: Re: Showing thick lines - a problem?