R - 序列化功能导致非常大的对象

Question

我遇到了一个问题，即序列化ggplot对象会导致一个非常大的原始向量：

library(ggmap)
>raw <- serialize(ggmap(get_map('Europe',zoom=4)))
>object.size(raw)
122917968 bytes

我已将其缩小为一个序列化的功能，约为120MB 是什么导致这种爆炸的大小？我该如何进一步调查？它与功能的环境有关吗？