Should we support `symbols(2)`? about tinyplot HOT 2 CLOSED

rscl = function (x) {
    from = range(x)
    to = c(1, 6)
    (x - from[1])/diff(from) * diff(to) + to[1]
}

with(
    data.frame(state.x77),
    plot(
        x = Income, y = Life.Exp,
        pch = 21,
        cex = rscl(Population),
        col = "white",
        bg = palette.colors(n = 4, alpha = 0.5)[-1],
        main = "Life expectancy among US states (1977)"
    )
)