my.ss.ng.ppp <- make.ss.ng.ppp()
my.ss.ng.ppp[[1]][[1]]
my.ss.ng.ppp[[1]][[2]]
gridExtra::grid.arrange(my.ss.ng.ppp[[1]][[1]], my.ss.ng.ppp[[1]][[2]], ncol=2)
my.ss.ng.ppp[[2]]
my.ss.ng.ppp[[3]]
my.ss.ng.ppp[[4]]
my.ss.ng.ppp[[5]]
my.ss.ng.ppp[[6]]
my.ss.ng.ppp[[7]]
Run the code above in your browser using DataLab