Exponential moving average of just the last value of a vector in R

Question

I have a simple vector as follows:

x = c(14.24, 13.82, 12.75, 12.92, 12.94, 13.00, 14.14, 16.28, 20.64, 17.64)

I have found the EMA of this v