如何使用AChartEngine库重绘或刷新条形图

Question

这里是我的代码。我想刷新或重绘条形图。但它在图形中显示新旧条形图。我希望​​当点击按钮只显示图形中的新条形图时。

代码：

plus :: Int -> Users -> Users
plus x (Age a) = Age (a+x)
plus x (Height h) = Height (h+x)

我的代码有什么问题或有没有办法在删除图表之前重新绘制或刷新新图表？ 请帮帮我。