powered by
costPlots(object, filename = "elasticIsing.pdf", width = 8, height = 5, theta = 25, phi = 30, ticktype = "simple", accuracy = TRUE)
elasticIsing
persp