# Minimal example: S + Sx->V
df <- data.frame(
expr = c("#1 #2", "#1", "#2"),
n_tokens = c(2L, 1L, 1L),
start = c(1L, 1L, 2L),
depth = c(0L, 1L, 1L),
type = c("", "S", "Sx->V"),
translation = c("", "water", "to utilize S"),
stringsAsFactors = FALSE
)
result <- sumer:::compose_skeleton_entry(df)
result
Run the code above in your browser using DataLab