x <- "mec3-ki-aj2-ga-ce-er ce du"
x <- as.cuneiform(x)
x
expr <- split_sumerian(x)$signs
expr
type <- c("S", "S", "Sx->A", "xS->A", "S", "Sx->S", "S", "Sx->V")
grammatical_structure(x, type, expr)
#You can also work with the transliteration:
x <- "mec3 ki aj2 ga ce er ce du"
expr <- split_sumerian(x)$signs
grammatical_structure(x, type, expr)
Run the code above in your browser using DataLab