Блог

Я пытаюсь создать png в R, где я могу изменять разрешение, не изменяя видимую высоту текста, и это не работает.

Вот мой код

 drawbox <- function(res, ps=12, textcex=1) {
  png(file="test.png",width=6,height=3, units="in", res=res, bg="transparent", pointsize=ps)
  plot(x=c(0,1),y=c(0,1),type="n",xaxs = 'i',yaxs = 'i',axes=FALSE)
  text(x=0.5, y=0.5, adj=c(0.5,0.5), labels="Some text", cex=textcex*6)
  dev.off()
}
  

тогда это приводит к совершенно другому размеру текста

 drawbox(res=300, ps=12, textcex=1)
  

чем это

 drawbox(res=100, ps=12, textcex=1)
  

но разве не в этом смысл аргумента pointsize, что этого не происходит?

Примечание: здесь мне нужна базовая графика, другим пакетам не хватает гибкости, чтобы позволить мне создавать то, что я хочу.

Если я буду возиться с этим параметром textcex, я смогу заставить все работать, но это раздражает.