r - 在r中标记曲线，绘图对象不是data.frame

Question

目前，我正在使用 SimInf 包。我想在曲线旁边的图形或图形右侧标记结果图曲线。通常的标记技术在这里不起作用，因为这里的绘图对象不是 data.frame。这是可以生成常规图的常用代码。我想在图形或图形右侧标记这些曲线。

library(SimInf)
transitions <- c("S -> beta*S*I/(S+E+I+R+D) -> E ", "E->epsi*E->I" , "I -> gamma*I -> R",
                 "I -> mu*I -> D")
compartments <- c("S", "E", "I", "R","D")
u0 <- data.frame(S = 9989,  E= 10, I = 1, R = 0, D=0)
model1 <- mparse(transitions = transitions, compartments = compartments,
                 gdata = c(beta = 0.16, epsi=0.25, gamma = 0.077,  mu=0.01), u0 = u0, tspan = 1:250)
set.seed(3)
set_num_threads(1)
result<- run(model = model1)
run(result)
plot(result)```