Assign the categorical variable (outlay) as a factor;
Plot using the ggplot.
Compiling the data
Compile the data into columns: one column for the budget expenditure (e.g. "Social Security," "Medicare," etc.) and the other for the amount ("644," "408," etc.).
Name the columns "Expenditure" and "Billions" for the expenditure category and the amount (in billions of U.S. dollars), respectively.
Save the data as comma-separated value file (csv).
R code to produce chart
# Load the ggplot2 library
library("ggplot2")
# Data saved using European separators ("." for thousands and "," for decimals), so use read.csv2().
# If data is saved using U.S. separators ("," for thousands and "." for decimals), use read.csv().
my.data <- read.csv2("2009expenditures.csv")
# Ensure that the categories are treated as factors
my.data <- data.frame(Billions = my.data$Billions, Expenditure = factor(my.data$Expenditure))
# Plot using ggplot2
ggplot(data = my.data, aes(Billions)) +
geom_point(aes(y=reorder(Expenditure, Billions))) +
xlab("Billions of U.S. Dollars") + ylab("")
{{Information |Description={{en|1=Dot plot of the total U.S. government budget in 2009, including both mandatory and discretionary. Taken from data at wikipedia:2009 United States federal budget.}} |Source={{own}} |Author=Thopper |Dat