Eric Weber
April 18, 2016
The shiny app allows the user to subset the data by year, rank, and company, displaying the total revenue and profit for those companies in millions that year.
This allows the user to see which years a company was present in the dataset, which companies were present in a given year, and which companies were a particular rank in a particular year.
While the table could certainly be extended to do more, I focused on usability in this project.
head(f500, n = 5)
year rank company rev profit
1 1955 1 General Motors 9823.5 806.0
2 1955 2 Exxon Mobil 5661.4 584.8
3 1955 3 U.S. Steel 3250.4 195.4
4 1955 4 General Electric 2959.1 212.6
5 1955 5 Esmark 2510.8 19.1
summary(f500[,c(4,5)])
rev profit
Min. : 49.7 Min. :-99289.0
1st Qu.: 443.3 1st Qu.: 9.7
Median : 1498.0 Median : 44.9
Mean : 5237.2 Mean : 261.2
3rd Qu.: 4607.8 3rd Qu.: 206.3
Max. :442851.0 Max. : 45220.0
NA's :369