Межстрочный интервал в аннотации R / tikz

Chai спросил: 28 апреля 2018 в 08:38 в: r

Я делаю фигуру в R, используя Tikz. Я добавляю текст, охватывающий две строки к полям, используя mtext. Как уменьшить расстояние между двумя строками текста, генерируемыми mtext?

Вот пример сценария R:

library("tikzDevice")
outfn<-"LineSpaceingExample.tex"
mydim <- 4
tikz(outfn,standAlone=TRUE,width=mydim,height=mydim)
mytext<- "This is some\nexample text"
x<-c(0, 1)
y<-x
plot(x, y, type = "n")
mtext(text=mytext, side=3,line=0.1)
dev.off()

Рисунок, который я получаю после компиляции файла .tex, сгенерированного этим скриптом, является:

Чтобы уточнить, я хотел бы остановиться на вертикальном расстоянии между "Это некоторые"и" пример текста".

1 ответ

Chai ответил: 29 апреля 2018 в 06:35

В следующем раунде Googling появилось решение: уменьшение par()$lheight до вызова mtext. Следующий скрипт сделал трюк:

library("tikzDevice")
outfn<-"LineSpaceingExample.tex"
mydim<-4
tikz(outfn,standAlone=TRUE,width=mydim,height=mydim)
mytext1<- "This is the default\nline spacing"
mytext2<- "This is modified\nline spacing"
x<-c(0, 1)
y<-x
plot(x, y, type = "n")
mtext(text=mytext1, side=3,line=0.1, at=0.2)
par(lheight=0.8)
mtext(text=mytext2, side=3,line=0.1, at=0.8)
dev.off()