plot <- ggtern(data=data.frame(x=1,y=1,z=1),aes(x,y,z)) +
geom_point() +
tern_clockwise()
plot <- ggtern(data=data.frame(x=1,y=1,z=1),aes(x,y,z)) +
geom_point() +
tern_anticlockwise()
plot <- ggtern(data=data.frame(x=1,y=1,z=1),aes(x,y,z)) +
geom_point() +
tern_counterclockwise()
Run the code above in your browser using DataLab