#the observations show on the y-axis .values on x-axis
ggInterval_index(iris,aes(x=iris$Sepal.Length))
#change above axis
ggInterval_index(mtcars,aes(y=disp,col="red",fill="grey"))
#symbolic data
mydata <- ggESDA::facedata
ggInterval_index(mydata,aes(x=3:13,y=AD))
Run the code above in your browser using DataLab