Source: http://web.archive.org/web/20110616005931/http://www.msnbc.msn.com/id/8904252/

Original source: the Associated Press

Original source: Congressional Budget Office

I can't find the original data at www.cbo.gov. Add a link here if you find it.

It was created using R with the following R code

subsidies.values = c(7.3, 3.5, 1.6, 1.5, 1.5, 0.686, 0.626, 0.271)
names(subsidies.values) = c("Corn/feed", "Cotton", "Soybean", "Wheat", "Tobacco", "Dairy", "Rice", "Peanut")

subsidies.title = "United States farm subsidies in 2005"
subsidies.sub = "Source:  Congressional Budget Office (via the Associated Press)"
subsidies.file = "United States farm subsidies (source Congressional Budget Office).svg"


svg(file=subsidies.file,width=10, height=10)
par(lwd=2,mgp=c(3+2, 1, 0),mar=c(5+2,4+2,4,2)+.1)
barplot(subsidies.values, ylim=c(0, 8), main=subsidies.title, sub=subsidies.sub, xlab="Program", ylab="Billion USD", col=2:30, las=2)

dev.off()