如何删除R中的第二个x和y轴?

时间:2016-10-31 15:54:59

标签: r plot pca vegan

希望今天是一个简单的问题:

我正在绘制一个RDA(在R Studio中),并希望删除第二个X和Y(顶部和右侧)轴。纯粹出于美学目的,但仍然如此。我使用的代码如下。我已经设法删除了第一个轴(我以后用更好的东西替换它们)xaxt =" n"和yaxt =" n",但它仍然把其他人放进去。

问题:如何从R中的图中移除顶轴和右轴?

为了使这个例子具有可再现性,你需要两个相同长度的数据帧,称为" bio"和" abio"分别。

library (vegan) ##not sure which package I'm actually employing
library(MASS)   ##these are just my defaults
rdaY1<-rda(bio,Abio) #any dummy data will do so long as they're of equal length
par(bg="transparent",new=FALSE)
plot(rdaY1,type="n",bty="n",main="Y1. P<0.001 R2=XXX",
     ylab="XXX% variance explained",
     xlab="XXX% variance explained",
     col.main="black",col.lab="black", col.axis="white",
     xaxt="n",yaxt="n",axes=FALSE, bty="n")
abline(h=0,v=0,col="black",lwd=1)
points(rdaY1,display="species",col="gray",pch=20)
#text(rdaY1,display="species",col="gray")
points(rdaY1,display="cn",col="black",lwd=2)
text(rdaY1,display="cn",col="black")

更新:使用下面的评论我已经用各种方法摆脱了轴,看起来像是第二个&#34;点&#34;我要求绘制矢量的命令就是问题所在。有什么想法吗?

1 个答案:

答案 0 :(得分:0)

bty="L"为我工作。我使用rnorm()生成了一些随机数据来测试:

library(vegan)
mat <- matrix(rnorm(100), nrow = 10)
pl <- rda(mat)
plot(pl, bty="L")

这是结果。

enter image description here