Filter out columns that do not need to be copied
colsNotToCopy(g, s.aes)
g
Geom with columns
s.aes
Selector aesthetics
Character vector of columns not to be copied