Poverty Trap

This commit is contained in:
Nuno 2019-12-12 19:33:00 +01:00
parent d4b671695f
commit 4678f92131
3 changed files with 4 additions and 0 deletions

BIN
ea/PovertyTrap1.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 38 KiB

BIN
ea/PovertyTrap2.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 42 KiB

View File

@ -24,5 +24,9 @@ ggplot(data = d)+
geom_point(aes(x=x, y=y), size = 0.0001)+ geom_point(aes(x=x, y=y), size = 0.0001)+
blank blank
p <- ggplot(data = data.frame(x = 0), mapping = aes(x = x))
p + stat_function(fun = sun) + xlim(-5,5)
ggsave("temp.png", width = 30, height = 30, units = "cm") ggsave("temp.png", width = 30, height = 30, units = "cm")