File:US-gas-production-1900-2011.svg
Jump to navigation
Jump to search
Size of this PNG preview of this SVG file: 650 × 506 pixels. Other resolutions: 308 × 240 pixels | 617 × 480 pixels | 771 × 600 pixels | 987 × 768 pixels | 1,280 × 996 pixels.
Original file (SVG file, nominally 650 × 506 pixels, file size: 7 KB)
Contents
Summary[edit]
| Description |
English: U.S. Natural Gas Marketed Production (cf) 1900 to 2011, data from US EIA
|
| Date | |
| Source | Own work |
| Author | Mrfebruary |
Data[edit]
Data: download a spreadsheet from http://www.eia.gov/dnav/ng/hist_xls/N9050US2a.xls convert to a .csv file and save to your R working directory
R script[edit]
gas <- read.csv("N9050US2a.csv",skip=3, header=TRUE, sep=",", na.strings="NA", dec=".", strip.white=TRUE)
str(gas)
'data.frame': 112 obs. of 2 variables:
$ Year: Factor w/ 112 levels "1900/06/30","1901/06/30",..: 1 2 3 4 5 6 7 8 9 10 ...
$ gas : int 128000 180000 206000 239000 257000 320000 389000 407000 402000 481000 ...
tgas<-ts(gas$gas, frequency = 1, start = c(1900, 1))
str(tgas)
Time-Series [1:112] from 1900 to 2011: 128000 180000 206000 239000 257000 320000 389000 407000 402000 481000 ...
library("RSVGTipsDevice")
devSVGTips(file="US-gas-production-1900-2011.svg",toolTipMode=0,width=9,height=7)
plot(tgas/10^6,ylim=c(0,25),lwd=2,type="l",col="4", main="",xlab="Year", ylab="(cubic feet x 10^12)")
mtext(side=3,line=-2.3,"Data: US EIA \nhttp://www.eia.gov/dnav/ng/hist_xls/N9050US2a.xls")
box(lwd=2)
dev.off()
Licensing[edit]
I, the copyright holder of this work, hereby publish it under the following license:
|
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license. | |
|
File history
Click on a date/time to view the file as it appeared at that time.
| Date/Time | Thumbnail | Dimensions | User | Comment | |
|---|---|---|---|---|---|
| current | 10:50, 26 August 2012 | 650 × 506 (7 KB) | Mrfebruary (talk | contribs) | User created page with UploadWizard |
- You cannot overwrite this file.
File usage on Commons
The following page uses this file: