plot_producer(x,
type = c("left.continuous", "right.continuous", "curve"),
extend = FALSE, add = FALSE, pch = 1, col = 1, lty = 1,
lwd = 1, cex = 1, col.steps = col, lty.steps = 2,
lwd.steps = 1, xlab = "", ylab = "", main = "",
xmarg = 10, xlim = c(0, length(x) * 1.2),
ylim = c(0, max(x)), ...)'left.continuous' (the default) or
'right.continuous' for step functions and
'curve' for a continuous step curveFALSEFALSE by defaulttype of
'left.continuous' and 'right.continuous'
onlyplot.defaulttype
== 'left.continuous', the default) or by a curve joining
the points $(0, x_{(n)})$, $(1, x_{(n)})$,
$(1, x_{(n-1)})$, $(2, x_{(n-1)})$, ..., $(n,
x_{(1)})$. Here, $x_{(i)}$ denotes the $i$-th
smallest value in $x$.In bibliometrics, a step function of one of the two above-presented types is called a citation function.
For historical reasons, this function is also available
via its alias, plot.citfun [but its usage is
deprecated].
john_s <- c(11,5,4,4,3,2,2,2,2,2,1,1,1,0,0,0,0)
plot_producer(john_s, main="Smith, John", col="red")Run the code above in your browser using DataLab