我创建了马尔可夫链图，但我希望减少当从一个状态转换到另一个状态时箭头上出现的频率转换数的大小。
我该怎么做？
这是我的代码：
library(markovchain)
tmA<-matrix(c(0.09,0.01,0.47,0.04,0,0,0,0.04,0.23,0,0.04,0.01,0,0.01,0,0.04,0.02, 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0.74,0,0,0.1,0,0,0,0,0,0,0.01,0.06,0,0,0,0.05,0.04,0.2,0,0,0,0.4,0,0,0.1,0.1,0.1,0.1,0,0,0,0,0,0,0,0,0.125,0,0,0.125,0.375,0,0.125,0,0.125,0,0.125,0,0,0,0,0,0,0,0,0,0,0.5,0,0.5,0,0,0,0,0,0,0,0,0,0,0.125,0,0,0.125,0,0.5,0.125,0,0,0,0,0.125,0,0,0,0.25,0.035,0.07,0,0.035,0,0.07,0,0.25,0.11,0.11,0,0.035,0.035,0,0,0,0.575,0,0,0,0.05,0,0,0.15,0,0.075,0.025,0.025,0.05,0.025,0,0,0.025,0.1,0,0.1,0,0,0,0,0.2,0.3,0,0.1,0.1,0,0.1,0,0,0,0.15,0,0.15,0,0.1,0,0,0.5,0,0,0,0,0,0.1,0,0,0,0,0,0.75,0,0,0,0,0.25,0,0,0,0,0,0,0,0,0,0,0,0,0.25,0,0,0.25,0,0.5,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0.16,0.17,0,0,0,0,0,0.5,0.17,0,0,0.25,0.75,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0.27,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0.18,0.55,0.667,0,0,0,0,0,0,0,0,0,0,0,0.083,0,0,0,0.25), nrow=17,byrow=TRUE)
dtmcA<-new("markovchain",transitionMatrix=tmA,states=c("P","R","ROH","RA","TS","WS","RS","SB","ROP","Pp","T","G","OB","CT","JC","RP","F"),name="markovchain A")
plot(dtmca,edge.arrow.size=0.5)