问：我如何使文本在数字周围浮动？

EN

我用R做了一个流程图，包括在我的R文件中。

现在的样子：

​

守则：

```{r flowchart-data, echo = FALSE, message = FALSE, fig.cap = "Ablauf der Datenverarbeitung", fig.align = "right",  fig.width = 7, fig.height = 6, out.extra = 'trim = {0 1.1cm 0 0}, clip', out.width=".7\\textwidth"}

图书馆(网格)

图书馆(Gmisc)

grid.newpage()

设置要重复使用的一些参数

左撇子<- .2

midx <- .5

rightx <- .8

myBoxGrob <-函数(文本，.){

boxGrob(标签=文本，b= "top"，box_gp =gpar(填充=“白灰”)，.)

}

创建框

(Pharmazie <- myBoxGrob("Verbrauchsdaten von der\n Spitalpharmazie (Excel)“，x=leftx，y=1，宽度= 0.36))

(Finanzen <- myBoxGrob("Belegzahlen vom Ressort\n Finanzen (Excel)“，x=rightx，y=1，宽度= 0.36))

(A <- myBoxGrob(“\n Microsoft (Datenbanksoftware)"，x=midx，y=0.83，width = 0.45))

(B <- myBoxGrob("Zusammenführen der Informationen\n und erstellen neuer，berechneter Tabellen"，x=midx，y=.66，宽度= 0.45))

(C <- myBoxGrob("Export erstellten Tabellen\n Form von erstellten“，x=midx，y=.49，宽度= 0.45))

(D <- myBoxGrob(“进口R中的中性Tabellen”，x=midx，y=.32，宽度= 0.45))

(E <- myBoxGrob("Berechnung und grafische Darstellung\n der Grafiken und Tabellen"，x=midx，y=.19，宽度= 0.45))

connectGrob(制药公司，A，"L")

connectGrob(Finanzen，A，"L")

connectGrob(A，B，"N")

connectGrob(B，C，"N")

connectGrob(C，D，"N")

connectGrob(D，E，"N")

我想要的：

1. 我希望文本使用图形左边的空格。
2. 我希望图形标题与图形的中心对齐。现在标题位于页面的中间，忽略图形是居中、右对还是左对齐的。

我怎样才能实现这些目标？

编辑1:我想编织到pdf。

编辑2:按照评论中的要求，我的页面现在看起来如何：

​