r - 在绘图频率图上设置 X 轴范围

Question

考虑下面的图表:

library(dplyr)
library(plotly)

x <- c(1, 1, 2, 2, 3, 3, 4, 4, 4, 4, 4, 5, 6, 8, 8, 8, 10, 10)
y <- as.data.frame(table(x))

y %>%
plot_ly(x = ~ x,
        y = ~ Freq,
        type = 'bar')

我想利用该图并生成一个类似的图，其中列出的值 7 和 9 的频率为零。有没有办法获得像 seq(0, 10, 1) 这样的序列的频率计数，其中 7 和 9 将显示为 0 的频率，或者有没有办法可以设置 x即使我的数据中没有所有数字，我的绘图图上的轴是否从 0 到 10？

我已经尝试过

y %>%
plot_ly(x = ~ x,
        y = ~ Freq,
        type = 'bar') %>%
layout(xaxis = list(autotick = FALSE, tick0 = 0, tickd = seq(0, 10, 1))

还有

layout(xaxis = list(autotick = FALSE, tick0 = 0, tickd = c(0,10))

但两者似乎都没有改变任何事情。

我希望我想要的输出如下所示:

请注意，这只是一个小样本，我的实际数据会大得多。因此，诸如循环数据并计算每个数字之类的操作会太慢。

Answer 1

一个简单的解决方案是将 x 转换为级别从 1 到 10 的因子。

library(dplyr)
library(plotly)

x <- c(1, 1, 2, 2, 3, 3, 4, 4, 4, 4, 4, 5, 6, 8, 8, 8, 10, 10)
x <- factor(x, levels=1:10)

y <- as.data.frame(table(x))

y %>%
plot_ly(x = ~ x,
        y = ~ Freq,
        type = 'bar')