1. Compile data from list of budget items at wikipedia:2009 United States federal budget and save to a file (e.g. "2009expenditures.csv");
2. Load data in R (programming language);
3. Load the ggplot2 library;
4. Assign the categorical variable (outlay) as a factor;
5. Plot using the ggplot.

1. 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.).
2. Name the columns "Expenditure" and "Billions" for the expenditure category and the amount (in billions of U.S. dollars), respectively.
3. Save the data as comma-separated value file (csv).

# 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("")

Já, držitel autorských práv k tomuto dílu, ho tímto zveřejňuji za podmínek následující licence:

Tento soubor podléhá licenci Creative Commons Uveďte autora-Zachovejte licenci 3.0 Unported.

Dílo smíte:

• šířit – kopírovat, distribuovat a sdělovat veřejnosti
• upravovat – pozměňovat, doplňovat, využívat celé nebo částečně v jiných dílech

Za těchto podmínek:

• uveďte autora – Máte povinnost uvést autorství, poskytnout odkaz na licenci a uvést, pokud jste provedli změny. Toho můžete docílit jakýmkoli rozumným způsobem, avšak ne způsobem naznačujícím, že by poskytovatel licence schvaloval nebo podporoval vás nebo vaše užití díla.
• zachovejte licenci – Pokud tento materiál jakkoliv upravíte, přepracujete nebo použijete ve svém díle, musíte své příspěvky šířit pod stejnou nebo slučitelnou licencí jako originál.

https://creativecommons.org/licenses/by-sa/3.0CC BY-SA 3.0 Creative Commons Attribution-Share Alike 3.0 truetrue