install.packages（"ggplot2"）
library（ggplot2）
install.packages（"dplyr"）
library（dplyr）

setwd（"c:\\r_sample"）
people1<-read.csv（"남한생산가능인구.csv",header=T）
people1
people2<-read.csv（"북한생산가능인구.csv",header=T）
people2
people3<-read.csv（"남북한생산가능인구.csv",header=T）
people3

a<-ggplot（people3,aes（x=year,y=people_S））+geom_bar（stat="identity",fill="red"）
a
b<-ggplot（people3,aes（x=year,y=people_N））+geom_bar（stat="identity",fill="blue"）
b

c<-ggplot（data=people3）+geom_bar（a）+geom（b）
c

합칠것을 C로 놓고 넣고싶은데 어떻게 하면 되나요
a,b는 나왔습니다