Permalink
Browse files

remove asp=1 from phylomorphospace3d

  • Loading branch information...
liamrevell committed Feb 9, 2018
1 parent 2b49dea commit 8d126f698425c827a5145a1a217c4eab1dc1a1fd
Showing with 1 addition and 1 deletion.
  1. +1 −1 R/phylomorphospace3d.R
View
@@ -68,7 +68,7 @@ phylomorphospace3d<-function(tree,X,A=NULL,label=TRUE,control=list(),method=c("d
if(hasArg(zlim)) zlim<-list(...)$zlim
else zlim=NULL
xx<-scatterplot3d(X,xlab=colnames(X)[1],zlab=colnames(X)[3],pch=19,angle=angle,
ylab=colnames(X)[2],asp=1,cex.symbols=1.3,xlim=xlim,ylim=ylim,zlim=zlim)
ylab=colnames(X)[2],cex.symbols=1.3,xlim=xlim,ylim=ylim,zlim=zlim)
aa<-xx$xyz.convert(A)
points(aa$x,aa$y,pch=19,cex=0.8)
for(i in 1:nrow(tree$edge)){

0 comments on commit 8d126f6

Please sign in to comment.