我正在尝试绘制以下数据的图表（简化）：
timeafterfeed feed ch1
0 0 10
2 0 30
4 0 20
6 0 10
0 1 30
2 1 30
4 1 40
6 1 50
0 2 20
2 2 20
4 2 30
6 2 40
8 2 40
10 2 30 该图应看起来像一个热图，具有3行/ y轴（“馈送” /第二列），填充应表示“ ch1” /第三列的值。 当前，第二列“ feed”由三个因子0、1、2组成。 “ timeafterfeed” /第一列是时间的方向。
我已经尝试使用geom_tile（）和stat_bin2d（）进行以下操作。
gg <- ggplot(data = feedata, aes(x = Timeafterfeed, y = Feed)) +
stat_bin2d(aes(fill = Ch1), binwidth = c(1,2))
gg
gg <- ggplot(data = feedata, aes(x = Timeafterfeed, y = Feed, fill = Ch1)) +
geom_tile()
gg
我希望看到一个带有彩色图块的图，其中时间沿x轴移动，沿y轴移动，绘制了三个不同的类别：Feed 0，Feed 1，Feed2。填充的颜色根据Ch1的值。