data$Billions, Expenditure = factor(my.data$Expenditure)) # Plot using ggplot2 ggplot(data = my.data, aes(Billions)) + geom_point(aes(y=reorder(Expenditure, Billions)))...
