R 如何将函数中向量的名称输入到图例中？

图例标签将是vec1和vec2

类似于

legend=c（deparse（substitute（x）））

？有没有办法使函数中的x和i都能工作？我是通过使用legend=c（deparse（substitute（x）），deparse（substitute（i）））得到的，谢谢！类似于

legend=c（deparse（substitute（x）））

？有没有一种方法可以使函数中的x和i都工作？我是通过使用legend=c（deparse（substitute（x）），deparse（substitute（i）））得到它的，谢谢！

compareECDFs<-function(x,i,xlab){
    ecdf1<-ecdf(c(x))
    ecdf2<-ecdf(c(i))
    xlab<-xlab
    name<-c(c(x),c(i))
plot1<-plot(ecdf1,ylab="Cumulative relative frequency",xlab=xlab,lty=ifelse(c(x)>c(i),"solid","dotted"),verticals=TRUE,xlim=range(c(x),c(i)))
lines1<-lines(ecdf2,lty=ifelse(c(i)>c(x),"solid","dotted"),verticals=TRUE)
legend1<-legend("right",legend=c(print(name)),lty=c(1,3),cex=0.8)
output<-c(plot1,lines1,legend1)
return(output)
}

> compareECDFs(vec1,vec2,"dbh")