我正在使用 vegan 包中的 metaMDS 函数进行一维重新缩放,如下所示:

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结果绘制为水平图?