1

#### PREGUNTA N°1

X=vector()
Y=vector()
U=vector()
U1=vector()
U2=vector()
n=1000

for (i in 1:n) {
  U1[i]=runif(1,0,1)
  U2[i]=runif(1,0,1)
  U[i]=runif(1,0,1)
  Y[i]=(exp(U[i]^2)+(exp((1-U[i])^2)))/2
  X[i]=(exp(U1[i]^2)+(exp(U2[i]^2)))/2
}

Antiteticas1=mean(Y)
Antiteticas1
var(Y)/n

Diferentes1=mean(X)
Diferentes1
var(X)/n