I am fitting a model using gam from the mgcv package and store the result in model and so far I have been looking at the smooth components
gam
mgcv
model
FYI, visreg can directly output a gg object:
visreg
gg
visreg(model, "x1", gg=TRUE)