I've built a simple line plot in ggplot:
library(ggplot2)
mortProb <- c(0, 0.01327, 0.00885, 0.03524, 0.01402, 0.07983, 0.09483, 0.16742, 0.40265)
vs <- c(0.0, 20.7855, 25.138625, 30.8095, 36.221375, 41.250375, 48.75, 58.527875, 100)
VS <- data.frame(vs, mortProb)
ggplot(VS) + geom_line(aes(vs, mortProb))
The graph I get is :
enter image description here

What I want to get is just the plot inside of the black lines here (lines wouldn't actually show up in the graph.
enter image description here

Any ideas?
2:
