I have a data frame that wants to make a DAGplot in R. this is the sample of data.
structure(list(NMSUKU = c("Aceh/ Achin/ Akhir/ Asji/ A-Tse/ Ureung Aceh",
"Alas", "Aneuk Jamee", "Gayo", "Gayo Lut", "Gayo Luwes", "Gayo Serbe Jadi",
"Kluet", "Simeulue", "Simeulue", "Simeulue", "Singkil", "Tamiang"
), TopLang = c("1_Aceh/ Acheh/ Achi", "9_Alas", "4_Aceh Jamee",
"10_Gajo/ Gayo", "10_Gajo/ Gayo", "10_Gajo/ Gayo", "10_Gajo/ Gayo",
"5_Aceh Kluet", "11_Long Bano/ Simalur/ Simeuloe/ Simeulue/ Simulul",
"7_Aceh Simeleu Barat", "8_Aceh Simeleu Tengah", "3_Aceh Hulu Singkil",
"14_Tamiang"), language = c("1_Aceh/ Acheh/ Achi", "9_Alas",
"4_Aceh Jamee", "10_Gajo/ Gayo", "10_Gajo/ Gayo", "10_Gajo/ Gayo",
"10_Gajo/ Gayo", "5_Aceh Kluet", "11_Long Bano/ Simalur/ Simeuloe/ Simeulue/ Simulul",
"7_Aceh Simeleu Barat", "8_Aceh Simeleu Tengah", "3_Aceh Hulu Singkil",
"14_Tamiang")), class = "data.frame", row.names = c(NA, -13L))
I want to draw a plot like this: