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