Page design for pdf when using functions R

[Mary_first]

Help me please with design pade, because I dont know how I can change it. I have right exaple. My achievement looks awful (many colors, fill, different fonts). I want the same strict design of my work.

As an example - my code:
x=seq(0,4.0,0.01)
delta=1
alpha1=0.5
alpha2=1
alpha3=1.5

#Plotnost
plot(x,dweibull(x, shape=alpha1, scale=delta, log=FALSE),type="l",xlab="x",
ylab="hustota",ylim=c(0,2),lwd=2)
par(new=TRUE)
plot(x,dweibull(x, shape=alpha2, scale=delta, log=FALSE),type="l",xlab="x", ylab="hustota",ylim=c(0,2),lwd=2, col="red")
par(new=TRUE)
plot(x,dweibull(x, shape=alpha3, scale=delta, log=FALSE),type="l",xlab="x",ylab="hustota",ylim=c(0,2),lwd=2, col="green")

#F(X)
plot(x,pweibull(x, shape=alpha1, scale=delta, lower.tail=TRUE, log.p=FALSE), type="l", xlab="x", ylab="F(x)", ylim=c(0,2),lwd=2)
par(new=TRUE)
plot(x,pweibull(x, shape=alpha2, scale=delta, lower.tail=TRUE, log.p=FALSE), type="l", xlab="x", ylab="F(x)", ylim=c(0,2),lwd=2, col="red")
par(new=TRUE)
plot(x,pweibull(x, shape=alpha3, scale=delta, lower.tail=TRUE, log.p=FALSE), type="l", xlab="x", ylab="F(x)", ylim=c(0,2),lwd=2, col="green")

[mara]

You can turn off syntax highlighting by setting highlight = FALSE in your setup chunk (see R Markdown cheat sheet for reference).

As far as changing the overall style, I'd recommend taking a look at the R Markdown gallery, and starting from an option that is relatively close to your desired output.

https://rmarkdown.rstudio.com/gallery.html