我正在使用metaMDS包中的vegan函数进行一维重新缩放，如下所示：
mydata <- data.frame(X = sample(1:50), Y = sample(1:50), Z = sample(1:50))
mds <- metaMDS(mydata, distance="euclidian", autotransform=FALSE, k=1)
（这个例子只是随机数据，可能不会收敛，但由于这里的观点是可视化，因此无关紧要。）
当我绘制这个(plot(mds))时，我得到一个漂亮的垂直轴，包含原始数据点和数据维度。但是，我希望旋转绘图，使轴是水平的，但标签仍然可以垂直读取。
如何将metaMDS中的一维MDS结果绘制为水平图？