# NOT RUN {
S = stressSETUP()
pstart()
PLOTbox(S$Rax, S$Rbox, axcol= 'green', boxcol= 'purple')
pstart()
PLOTplane(S$Rp, planecol="brown")
PLOTbox(S$Rax, S$Rbox, axcol= 'green', boxcol= 'purple')
NORMvec(S$PPs, S$xscale, S$Rview, S$aglyph, add=TRUE)
# }
Run the code above in your browser using DataLab