testGGPlot tests too rigorious with the all.equal function in the scale testing section

[gubogaer]

The following dataframes are not equal in the current implementation

plot1<- dataframe %>%
    ggplot(aes(column1, column2)) +
    scale_x_log10('column1')

plot2<- dataframe %>%
    ggplot(aes(column1, column2)) +
    scale_x_log10()

yet they generate the exact same plot, this is caused by the all.equal function which is not suited for this.
this bug was first noticed in this dodona question