Jeśli chcesz zrobić wykres korelacji, korzystania z biblioteki corrplot ponieważ ma dużą elastyczność, aby utworzyć termiczna, jak dane dotyczące korelacji
library(corrplot)
#create data with some correlation structure
jnk=runif(1000)
jnk=(jnk*100)+c(1:500, 500:1)
jnk=matrix(jnk,nrow=100,ncol=10)
jnk=as.data.frame(jnk)
names(jnk)=c("var1", "var2","var3","var4","var5","var6","var7","var8","var9","var10")
#create correlation matrix
cor_jnk=cor(jnk, use="complete.obs")
#plot cor matrix
corrplot(cor_jnk, order="AOE", method="circle", tl.pos="lt", type="upper",
tl.col="black", tl.cex=0.6, tl.srt=45,
addCoef.col="black", addCoefasPercent = TRUE,
p.mat = 1-abs(cor_jnk), sig.level=0.50, insig = "blank")
Powyższy kod tylko dodaje kolor do korelacji które mają> korelację abs (0,5), ale możesz to łatwo zmienić. Na koniec istnieje wiele sposobów na skonfigurowanie wyglądu wykresu (zmiana gradientu koloru, wyświetlanie korelacji, wyświetlenie pełnego lub tylko pół macierzy itp.). Argument order jest szczególnie użyteczny, ponieważ pozwala na zamawianie zmiennych w macierzy korelacji na podstawie PCA, więc są one uporządkowane w oparciu o podobieństwa w korelacji.
Na placach, na przykład (podobnej do oryginalnej fabuły) - wystarczy zmienić metodę kwadratów: 
EDIT: @Carson. Nadal można korzystać z tej metody dla rozsądnych macierzy o dużej korelacji: na przykład macierz zmiennej 100 poniżej. Poza tym nie widzę, jaki jest pożytek z tworzenia graficznej reprezentacji macierzy korelacji z tak wieloma zmiennymi bez niektórych podzbiorów, które będą bardzo trudne do zinterpretowania. 
Czy próbowałeś zwiększyć rozdzielczość png? Powiedzmy, że 4 piksele na zmienną = 4x400 stają się obrazem 1600 x 1600 png. – Marek
Przykro mi, nie rozumiem, jak to zrobić i nie próbowałem tego. – user2258452
Możesz napisać obraz do png np .: 'png (" cor.png ", 1600,1600); print (levelplot (cor)); off() '. – Marek