Hi, I have these two data sets. I'm trying to unite them by "country" and "year" with full_join(). But it seems impossible (at least on my level) because they are really untidy.
library(tidyverse)
data1 <- data.frame(country = c("Australia", "Australia", "Australia", "Canada", "Canada", "Canada"),
series_name = c("var_1", "var_2", "var_3"),
YR1970 = c(20,65,50,20,65,50),
YR1971 = c(1,0,1,1,1,1),
YR1972 = c(36,37,38,50,50,52)
)
data2 <- data.frame(country = c("Australia", "Australia", "Australia", "Canada", "Canada", "Canada"),
year = c(1970, 1971, 1972, 1970, 1971, 1972),
var_x = c(175, 105, 100, 508, 588, 559),
var_y = c(10,10,30, 40,45,50),
var_z = c(0,10,3, 0,5,5)
)