       Re: Plotting a simple line at a weibull ProbabilityScalePlot

• To: mathgroup at smc.vnet.net
• Subject: [mg125323] Re: Plotting a simple line at a weibull ProbabilityScalePlot
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Tue, 6 Mar 2012 06:00:54 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <201203050741.CAA29900@smc.vnet.net>

```The coordinates for the Line need to be scaled the same way as the
data was scaled. From the More Information section of the Help page
for ProbabilityScalePlot:  {Log[x], Log[-Log[1 - y]]}

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,
Epilog -> {Red,
Map[{Log[#[]], Log[-Log[1 - #[]]]} &,
Line[{{0.001, .6321}, {100, .6321}}], {2}]}]

Bob Hanlon

On Mon, Mar 5, 2012 at 2:41 AM, Martin Palatini
<martin.palatini at googlemail.com> wrote:
> 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: Plotting a simple line at a weibull ProbabilityScalePlot
• Next by Date: Re: Plotting a simple line at a weibull
• Previous by thread: Plotting a simple line at a weibull ProbabilityScalePlot
• Next by thread: Re: Plotting a simple line at a weibull