Homework2Solutions PDF
Homework2Solutions PDF
Homework2Solutions PDF
> pexp(6,1/10)
[1] 0.4511884
(c) Find the probability that a strike lasts between six and seven days.
P (X<7X>6)
P (X < 7|X > 6) = P (X>6) =
> (pexp(7,1/10) - pexp(6,1/10))/(1 - pexp(6,1/10))
[1] 0.09516258
(e) Find the probability that a strike lasts between six and seven days.
1
> x <- seq(35, 0, len = 100)
> curve(dexp(x, 1/10), from = 0, to = 35, xlab="Days",
+ main="Exponential Distribution", ylab="Density")
Exponential Distribution
0.00 0.04 0.08
Density
0 5 10 15 20 25 30 35
Days
2
3. The length of time until a strike is settled is distributed uniformly from 0
to 10.5 days.
(a) Find the probability that a strike lasts less than one day.
P (X<7]X>6)
P (X < 7|X > 6) = P (X>6)
3
Uniform Distribution
0 2 4 6 8 10 12
Days
4
4. You are an executive at Proctor and Gamble and are about to introduce a
new product. Your boss has asked you to predict the market share (X, a
proportion between 0 and 1) that the new product will caputre. You are
unsure of X, but have found the best model to illustrate the distribution
of market share is a beta distribution with an = 2 and = 5.
> pbeta(.15,2,5)
[1] 0.2235157
(e) What two values of market share can you expect to be between 95% of the time?
> qbeta(.025,2,5)
[1] 0.04327187
> qbeta(.975,2,5)
[1] 0.6412346
(f) Based on your answer to the previous questions, would you suggest launching
the product? Explain.
There is a 22.35% chance that the market share will be less than 15%.
There is a 95% chance the market share will be between 4.3% and 22.35%.
Given these statistics, I would not suggest launching.