Create plot_exchange_freq.R