geom_tile添加了不在数据中的第三种填充颜色

Question

我很难创建一个可重现的示例，因为该问题似乎仅在数据帧的大小增大到无法粘贴到此处时才显示出来。我希望有人能支持我，并在这里提供帮助。我确定我做的事情很愚蠢，但是阅读帮助和搜索失败（也许是在“愚蠢”问题上。）

我有一个2,319行的数据帧和三个变量：clientID，month和nSlots，其中clientID是字符，month是{{1 }}和1:12是nSlots。

1:2

这里是> head(tmpDF2) month clientID2 nSlots 21 1 8 1 30 2 8 1 31 4 8 1 28 5 8 1 25 6 8 1 24 7 8 1

table(tmpDF2$nSlots)

我正在尝试使用> table(tmpDF2$nSlots, useNA = "always") 1 2 <NA> 1844 15 0 和ggplot来绘制客户的出席情况，我希望根据geom_tile的两个值来为图块使用两种颜色，但是当数据框上升，我得到第三种颜色。这是情节。

好。好吧，我知道你看不到，所以也许我应该在这里停止！啊哈，也许您可​​以单击链接到该链接。但愿如此！

这就是价值的代码。

nSlots

（对我而言）奇怪的是，当我将行数保持较小时，该图似乎可以正常工作，但是随着行数的增加，有一个问题，而我完全无法找到是否有一行ggplot(dat=tmpDF2, aes(x=month,y=clientID2,fill=nSlots)) + geom_tile() + # geom_text(aes(label=nSlots)) + theme(panel.background = element_blank()) + theme(axis.text.x=element_text(angle=90,hjust=1)) + theme(axis.text.y=element_blank(), axis.ticks.y=element_blank(), axis.line=element_line()) + ylab("clients") 的数据或值会触发它，当此第三种颜色（比图例中的一种颜色更浅）出现时。

TIA，

克里斯