image 関数のヒートマップに行ラベルと列ラベルをつける

library(ca) par(mai = c(0.85, 3, 0.68, 0.35)) #余白の調整 image(1:26,1:12,t(apply(author,2,rev)), xlab="",ylab="",xaxt="n",yaxt="n",col=gray.colors(12,start=1,end=0)…