带有加权水平线的R中的带状图

Question

我想在R中制作一个垂直条形图，但我希望对绘制的点进行加权，以使重量更大的点看起来更大。通常我会使用cex或符号（）但是我有86个点，所以这些点使得点重叠在一起并且很难区分。

因此，我想使用水平线作为我的点，并且随着重量的增加，这些线条会更长，但不会更厚。直方图在这里似乎也不太好，但也许我只是遗漏了一些东西。

此代码构建一些看起来像我的样本数据：

freqs <- c(15, 50, 110, 13, 290, 13, 14, 12, 66, 48)
scores <- c(2.1, 1.4, 2.2, 0.9, 0.9, 1.0, 1.0, 1.1, 2.5, 1.6)
mydata <- data.frame(scores, freqs)

此代码生成的条形图与我正在寻找的条形图接近，但不会根据频率拉长“ - ”点：

par("mar")
par(mar=c(1,1,1,1))
stripchart(mydata$scores
       , vertical = TRUE
       , ylim = c(0.5,3.5)
       , pch = "-"
)