Variables:
A data.frame with the following columns:
-
year
-
integer year starting with 1929
-
CorporateProfitsAdj
-
Corporate profits with inventory valuation and capital consumption adjustments in billions of current (not adjusted for inflation) US dollars
-
Domestic
-
Domestic industries profits in billions
-
Financial
-
Financial industries profits in billions
-
Nonfinancial
-
Nonfinancial industries profits in billions
-
restOfWorld
-
Profits of the "Rest of the world" in their contribution to US Gross Domestic Product in billions
-
FinanceProportion
-
= Financial/Domestic
Details
This is extracted from Table 6.16 of the National Income and Product Accounts (NIPA) compiled by the Bureau of Economic Analysis of the United States federal government. This table comes in four parts, A (1929-1947), B (1948-1987), C (1987-2000), and D (1998-present). Parts A, B, C and D contain different numbers of data elements, but the first five have the same names and are the only ones used here. The overlap between parts C and D (1998-2000) have a root mean square relative difference of 0.7 percent; there were no differences between the numbers in the overlap period between parts B and C (1987).
This was created using the following command:
demoDir <- system.file('demoFiles', package='Ecdat') demoCsv <- dir(demoDir, pattern='csv$', full.names=TRUE)
nipa6.16 <- readNIPA(demoCsv) USFinanceIndustry <- as.data.frame(nipa6.16) names(USFinanceIndustry) <- c('year', 'CorporateProfitsAdj', 'Domestic', 'Financial', 'Nonfinancial', 'restOfWorld') USFinanceIndustry$FinanceProportion <- with(USFinanceIndustry, Financial/Domestic)