Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

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

Search the Archive

Re: Plotting a simple line at a weibull ProbabilityScalePlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg125325] Re: Plotting a simple line at a weibull ProbabilityScalePlot
  • From: "djmpark" <djmpark at comcast.net>
  • Date: Tue, 6 Mar 2012 06:01:35 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <14518777.3351.1330934209701.JavaMail.root@m06>

Using the Epilog option it would be something like this:

ProbabilityScalePlot[{data1, data2, data3}, "Weibull", 
 PlotRange -> Automatic, GridLines -> Automatic, 
 GridLinesStyle -> "Classic", 
 FrameLabel -> {{Style["Ausfallwahrscheinlichkeit F(t) in %", Italic, 
     FontSize -> 12], 
    ""}, {Style["Lebensdauer", Italic, FontSize -> 12], ""}},
 Frame -> True,
 Epilog -> {Black, Thick, 
   Line[{{Log[0.001], 0.05}, {Log[60], 0.05}}]}]

But the value, 0.05, is only an approximate value. WRI does not tell us
enough about the underlying plot coordinates, and I don't know enough about
probability distributions.


David Park
djmpark at comcast.net 
http://home.comcast.net/~djmpark/index.html 


From: Martin Palatini [mailto:martin.palatini at googlemail.com] 


Hello,

I got a big problem with my ProbabilityScalePlot. I want to plot a simple,
horizontal line in my diagramm. This diagramm shows a weibull plot. In this
weibull plot are shown three different weibull distribution functions.

At the value of 63.21% on the y-axis, i want to plot this simple horizontal
line. This line symbolize the characteristic lifetime of a component. I
don't get it.

Please help me, i need this plot for my master thesis.

The code for the plot is called:

data1 = RandomVariate[WeibullDistribution[1, 1], 100];
data2 = RandomVariate[WeibullDistribution[1, 10], 100];
data3 = RandomVariate[WeibullDistribution[1, 2], 100];

ProbabilityScalePlot[{data1, data2, data3}, "Weibull",  PlotRange ->
Automatic, GridLines -> Automatic,  GridLinesStyle -> "Classic",  FrameLabel
-> {{Style["Ausfallwahrscheinlichkeit F(t) in %", Italic,
     FontSize -> 12],
    ""}, {Style["Lebensdauer", Italic, FontSize -> 12], ""}},  Frame ->
True]

P.S. My english isn't so good, but i hope you understand me.




  • Prev by Date: Re: Suppress Cell Labels
  • Next by Date: Re: Plotting a simple line at a weibull ProbabilityScalePlot
  • Previous by thread: Re: Plotting a simple line at a weibull ProbabilityScalePlot
  • Next by thread: recursive action