CO2 vs. Wood Removal ggplots

library(tidyr)
library(ggplot2)

co2 <- read.csv("tidyCO2.csv")
co2.2 <- read.csv("tidyCO2.2.csv")
wood <- read.csv("tidywood.csv")

1) CO2 in the USA, 2) Wood removal in the USA

ggplot(co2.2, aes(x=year, y=United.States)) +
  geom_point(aes(color=year)) +  
  ggtitle("CO2 in the US")

ggplot(wood, aes(x=year, y=United.States)) +
  geom_point(aes(color=year)) +
  ggtitle("Wood Removal in the US")

1) CO2 in UK, 2) Wood removal in UK

ggplot(co2.2, aes(x=year, y=United.Kingdom)) +
  geom_point(aes(color=year)) +
  ggtitle("CO2 in the the UK")

ggplot(wood, aes(x=year, y=United.Kingdom)) +
  geom_point(aes(color=year)) +
  ggtitle("Wood Removal in the UK")

1) CO2 in Afghanistan, 2) Wood removal in Afghanistan

ggplot(co2.2, aes(x=year, y=Afghanistan)) +
  geom_point(aes(color=year)) +  
  ggtitle("CO2 in the Afghanistan")

ggplot(wood, aes(x=year, y=Afghanistan)) +
  geom_point(aes(color=year)) +
  ggtitle("Wood Removal in Afghanistan")