I need to plot multiple explicit functions definitions to compare them visually.
Consider the family of functions:
fun.1 <- function(x) { 1 / ( 0.01