## 1000 standard exponential draws
X = rexp(1000)

## Estimate E log(X)
E1 = mean(log(X))

## Estimate log(EX)
E2 = log(mean(X))