Commit 4ded5cd8 authored by Anatole Cheysson's avatar Anatole Cheysson

Added na.omit()/Arranged figure size.

parent ccda4142
......@@ -114,7 +114,7 @@ loans_hh %>%
```
We decide to retain only countries which are available before 1990 to compute the aggregated series.
```{r, fig.align="center"}
```{r, fig.align="center", fig.height=7.5, fig.width=8}
available_country <- filter(loans_nfc,time=="1990-10-01")$country
loans_nfc_countries <-
......@@ -447,7 +447,7 @@ varname
# Entrepreunarial networth
The entrepreunarial networth is approximated through the Dow Jones index for the Euro area, in a similar spirit of what is chosen by @Chri14a in the US database.
```{r}
```{r, fig.align="center"}
# Dow Jones euro Euro area (changing composition) - Equity/index - Dow Jones Euro Stoxx 50 Price Index - Historical close, average of observations through period - Euro
url_series <- "/ECB/data/FM/Q.U2.EUR.DS.EI.DJES50I.HSTA"
......@@ -481,7 +481,7 @@ varname
# House prices
```{r}
```{r, fig.align="center"}
# House price Euro area 19 (fixed composition); Residential property prices, New and existing dwellings; Residential property in good and poor condition; Whole country; Neither seasonally nor working day adjusted; ECB
url_series <- "/ECB/data/RPP/Q.I8.N.TD.00.3.00"
......@@ -576,6 +576,7 @@ EA_Finance_rawdata <-
spread(key = var, value = values)
EA_Finance_rawdata %>%
na.omit() %>%
write.csv("EA_Finance_rawdata.csv", row.names=FALSE)
```
......@@ -602,6 +603,7 @@ EA_CMR_rawdata <-
spread(key = var, value = values)
EA_CMR_rawdata %>%
na.omit() %>%
write.csv("EA_CMR_rawdata.csv", row.names=FALSE)
```
......@@ -704,7 +706,7 @@ listVar <- list("Real GDP per capita" = "gdp_rpc",
```
```{r, fig.align="center", fig.height= 8.5}
```{r, fig.align="center", fig.height=8.5, fig.width=8}
plot_EA_CMR_data <- EA_CMR_data %>%
gather(var, values, - time)
plot_EA_CMR_data$time <- as.Date(as.yearqtr(plot_EA_CMR_data$time))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment