Money Stock Measures - H.6

Data - FRB

Author

François Geerolf

Nobs - Javascript

Code 
H6 %>%
  group_by(SERIES_NAME, CURRENCY, UNIT) %>%
  summarise(Nobs = n()) %>%
  left_join(H6_var$CURRENCY %>% rename(CURRENCY = id), by = "CURRENCY") %>%
  select(-description.default) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
SERIES_NAME CURRENCY UNIT Nobs label.default
MCU.WM USD Currency 2353 United States / United States Dollar
MCU_N.WM USD Currency 2353 United States / United States Dollar
MDD.WM USD Currency 2353 United States / United States Dollar
MDD_N.WM USD Currency 2353 United States / United States Dollar
MDO.WM USD Currency 2353 United States / United States Dollar
MDOB.WM USD Currency 2353 United States / United States Dollar
MDOB_N.WM USD Currency 2353 United States / United States Dollar
MDOT.WM USD Currency 2353 United States / United States Dollar
MDOT_N.WM USD Currency 2353 United States / United States Dollar
MDO_N.WM USD Currency 2353 United States / United States Dollar
MTC.WM USD Currency 2296 United States / United States Dollar
MTC_N.WM USD Currency 2296 United States / United States Dollar
M1.WM USD Currency 2040 United States / United States Dollar
M1_N.WM USD Currency 2040 United States / United States Dollar
M1.M USD Currency 733 United States / United States Dollar
M1_N.M USD Currency 733 United States / United States Dollar
MCU.M USD Currency 733 United States / United States Dollar
MCU_N.M USD Currency 733 United States / United States Dollar
MDD.M USD Currency 733 United States / United States Dollar
MDD_N.M USD Currency 733 United States / United States Dollar
MDO.M USD Currency 733 United States / United States Dollar
MDOB.M USD Currency 733 United States / United States Dollar
MDOB_N.M USD Currency 733 United States / United States Dollar
MDOT.M USD Currency 733 United States / United States Dollar
MDOT_N.M USD Currency 733 United States / United States Dollar
MDO_N.M USD Currency 733 United States / United States Dollar
MTC.M USD Currency 720 United States / United States Dollar
MTC_N.M USD Currency 720 United States / United States Dollar

Concepts

Code 
H6_struct_concepts %>%
  {if (is_html_output()) print_table(.) else .}
id default
ADJUSTED Seasonal Adjustment
OBS_STATUS Observation status
UNIT_MULT Unit multiplier
TIME_PERIOD Time
UNIT Units
HELD_AT Institution
OBS_VALUE Observation value
FREQ Frequency
SERIES_NAME Series Name
CURRENCY Currency
COMPONENT Component

UNIT_MULT

Code 
H6_var$UNIT_MULT %>%
  print_table_conditional()
id label.default description.default
.01 Hundredths Hundredths
.1 Tenths Tenths
1 One One
1000 Thousands Thousands
1000000 Millions Millions
100000000 Hundred millions Hundred millions
1000000000 Billions Billions
1000000000000 Trillions Trillions
1000000000000000 Quadrillions Quadrillions

CURRENCY

Code 
H6 %>%
  group_by(CURRENCY) %>%
  summarise(Nobs = n()) %>%
  left_join(H6_var$CURRENCY %>% rename(CURRENCY = id), by = "CURRENCY") %>%
  select(-description.default) %>%
  print_table_conditional()
CURRENCY Nobs label.default
USD 42438 United States / United States Dollar

M1 in the United States

Code 
H6 %>%
  filter(SERIES_NAME == "M1.WM") %>%
  arrange(TIME_PERIOD) %>%
  ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
  theme_minimal() + xlab("") + ylab("") +
  scale_x_date(breaks = seq(1960, 2020, 5) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%y")) + 
  scale_y_log10()