n=364
yn <- 100
yn_one <-100
xn <- (yn-yn_one)/sqrt(364)
mu <- 0
v <- .25
sigma <- round(sqrt(v),3)
a <- pnorm(yn-yn_one,mu,sigma,lower.tail = F)
yn <- 110
yn_one <-100
xn <- (yn-yn_one)/sqrt(364)
b <-pnorm(xn,mu,sigma,lower.tail = F)
yn <- 120
yn_one <-100
xn <- (yn-yn_one)/sqrt(364)
c <-pnorm(xn,mu,sigma,lower.tail = F)
\(\mu = E[X]\)
\(\sigma^2=E[X^2]-\mu^2\)
\[Moment\hspace{.15cm} Generating\hspace{.15cm} function:\] \[M(t)=E(e^{tX})=\sum\limits_{x_\in S}e^{tx}f(x)dx \] \[\mu=E[X]=M'(t);\hspace{.5cm} o^2=E[X^2]-E[X]^2=M''(t)\] \[M(t)=[(1-p)+pe^t]^n\] \[M'(t) = n[1-p+pe^t]^{n-1}(pe^t)\] \[when\hspace{.15cm}t=0;\] \[\hspace{.3cm}\mu=np=E[X]\] \[M''(t)=n[1-p+pe^t]^{n-1}(pe^t)+(pe^t)n(n-1)[1-p+pe^t]^{n-2}(pe^t)\] \[when\hspace{.15cm}t=0;\] \[M''(0)=n(n-1)p^2+np\] \[\sigma^2=E[X^2]-E[X]^2=np(1-p)\]
\[M(t) = \int_{0}^{\infty} e^{tx}\lambda e^{-x\lambda} dx =\] \[ \lambda\int_{0}^{\infty} e^{-x(\lambda-t)} =\]
\[when\hspace{.14cm}t=0;\] \[-\lambda \frac{e^{-x(\lambda-t)}}{\lambda-t}\Big|_{0}^{\infty}=\]
\[M(t)=\frac{\lambda}{\lambda-t}\]
\[E[X]=\mu = M'(t);\hspace{.3cm}when\hspace{.15cm}t=0\] \[M'(0)=\frac{\lambda}{(\lambda-0)^2}=\frac{\lambda}{\lambda^2}=\] \[E[X]=\mu=M'(0)=\frac{1}{\lambda}\] \[M''(t)=\frac{2\lambda}{(\lambda-t)^3}\]
\[M''(0); \hspace{.3cm}when\hspace{.15cm} t=0 \]
\[M''(0) = \frac{2\lambda}{\lambda^3}=\frac{2}{\lambda^2}\]
\[\sigma^2=E(X^2)-E(X)^2=\frac{2}{\lambda^2}-\frac{1}{\lambda^2}=\frac{1}{\lambda^2}\]