Designed to be an SVG replacement for Pareto distributionCDF.png.  Generated in R and made somewhat more minimal than the original but have titled axes
Source Code

pal &lt;- c("black","tomato", "royalblue", "darkgreen")
svg("ppareto.svg", 4, 4, family="Myriad Pro")
par0 &lt;- par(mar=c(4,4,0,0)+0.5)
plot.new(); plot.window(c(0,5), c(0,1))
lines(c(-1e6,1,1,1e6), c(0,0,1,0), col=pal[[1]]) # hack to make Infinity visible
curve(VGAM::ppareto(x, 1, 3), 1, 6, add=T, n=201, col=pal[[2]])
curve(VGAM::ppareto(x, 1, 2), 1, 6, add=T, n=201, col=pal[[3]])
curve(VGAM::ppareto(x, 1, 1), 1, 6, add=T, n=201, col=pal[[4]])
axis(1); axis(2); box(bty="l")
title(xlab="x", ylab=expression(Pr(paste(X," \u2264 ",x)))) # work around bug in R by using unicode character directly
legend("bottomright", expression(kappa==infinity,kappa==3,kappa==2,kappa==1), lty=1, col=pal, bty="n", inset=0.1)
par(par0)
dev.off()
Own work
Sam Mason