# NOT RUN {
# }
# NOT RUN {
##### no stress tensor provided => no mohr's circle
stress()
######################### run program with a stress tensor
Stensor = matrix(c(
15, 0, 0,
0, 10, 0,
0, 0, 5), ncol=3)
stress(Stensor=Stensor)
P1 = c(0.2, 1, 1, 0)
P2 = c(1, 0.1, 1, 0)
P3 = c(1, 1, 0.4, 0)
S = stressSETUP(P1, P2, P3, xscale=30 )
stress(PPs = S$PPs, Rview =S$Rview,
xscale = S$xscale, Stensor=Stensor )
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab