R循环弦图输出

我不熟悉R中的Circize包。但是，我的第一个和弦图的输出看起来是椭圆形的，而不是文档示例中所示的圆形。我能做什么？代码和下面的图片

    #random matrix, for illustration
    mat
       E1 E2 E3 E4 E5 E6
    S1  8 13 18  6 11 14
    S2 10 12  1  3  5  7
    S3  2 16  4 17  9 15
    chordDiagram(mat)

这是我的输出：

这就是我想要的：

---

您需要使用以下命令强制平方打印区域：

库（圆圈）
还有
library(circlize)

mat <- read.table(text=
",E1,E2,E3,E4,E5,E6
S1,8,13,18,6,11,14
S2,10,12,1,3,5,7
S3,2,16,4,17,9,15",header=TRUE,sep=",",row.names=1)
par(pty="s")
chordDiagram(as.matrix(mat))