Add legend to a plot with R

Question

I create 4 line in one plot using R . Here the code

# Define 2 vectors
cars <- c(123.07, 110.51, 96.14, 98.71, 101.3)
trucks <- c(110.31, 89.91, 89.81, 89.