I notice that the x axis of your plot is numeric when I would expect it to be categorical.
Please plot the result of using the first few rows MapleP derived from the head command, say,
NewData <- head(MapleP, 20)
and also post here the output of
dput(head(MapleP, 20))
so we can use exactly the same data you are using.