将绘图导出为PDF或JPG-标签未显示

Question

我试图将绘图导出为PDF或JPG，但标签未如图片所示显示。我更改了宽度和高度，但效果不佳。你能帮我吗？

my_data2 <- data[, c(2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21)]
chart.Correlation(my_data, histogram=TRUE, pch=19)

col<- colorRampPalette(c("blue", "white", "red"))(20)

pdf(file="heatmapSizeOK.pdf", height=36, width=26, paper="USr", pointsize=10, 
    useDingbats=TRUE, useKerning=TRUE)
heatmap(x = res, col = col, symm = TRUE)
dev.off()