MathGroup Archive 2001

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

Search the Archive

Two plots, two ranges with a Stress-Strain diagram

  • To: mathgroup at smc.vnet.net
  • Subject: [mg30803] Two plots, two ranges with a Stress-Strain diagram
  • From: "Tom Morris" <tsm145 at psu.edu>
  • Date: Wed, 19 Sep 2001 00:16:44 -0400 (EDT)
  • Organization: Penn State University, Center for Academic Computing
  • Sender: owner-wri-mathgroup at wolfram.com

I've got the following list of test data.
x = {{0, 0}, {.0175, 11.1}, {.06, 31.9}, {.102, 37.8}, {.165, 40.9}, {.249,
      43.6}, {1.016, 53.4}, {3.048, 62.3}, {6.35, 64.5}, {8.89,
      62.3}, {11.938, 58.8}}
  and have plotted them seperately,

p1 = ListPlot[x, PlotRange -> {{0, 13}, {0, 70}}, PlotJoined -> True,
    AxesLabel -> {"e(in.in.)", "\[Sigma](ksi)"},
    PlotStyle -> RGBColor[1, 0, 0]]
and:

P2 = ListPlot[x, PlotRange -> {{0, .25}, {0, 70}}, PlotJoined -> True,
    PlotStyle -> RGBColor[1, 0, 0]]

what I'd like to do is plot the whole Stress-Strain diagram given by p1 and
the Elastic region given by p2 on the same graph.  Show[p1,p2] will plot the
points, but of course the detail I'm trying to show from p1 from 0 to .25
with p2 just gets plotted over the first plot. I'm somewhat new to
Mathematica but have tried several things, the "Scale" function looked like
it might do the job but I had no luck, Offset also looked as if it had
potential but it too gave me problems.  Any suggestions would be great.
Thanks in advance.

Tom Morris




  • Prev by Date: Re: Help w/ Mathematica: simple stuff
  • Next by Date: Re: newbie: computing rational numbers and decimal
  • Previous by thread: Re: Numbered equations
  • Next by thread: RE: Two plots, two ranges with a Stress-Strain diagram