Как мы можем вставить «символ» в синтаксис DiagrammeR - PullRequest
Новая
       8

Как мы можем вставить «символ» в синтаксис DiagrammeR

0 голосов
/ 17 января 2019

У меня есть следующая рабочая блок-схема, созданная с пакетом DiagrammeR. 

library(DiagrammeR)
grViz(
  "digraph{
  graph[layout='dot',outputorder=edgesfirst,overlap=T,rankdir=LR]

  b[label='population=BARI_POP4_5_PRIMARY_CN.csv']
  c [label='timepoint=12']
  d[label='endpoint=ACR50']
  b->c[label='']
  c->d[label='']
  }")

Мне было интересно, как можно вставить в этот синтаксис variable_x[1] из variable_x <- c("population", "timepoint","endpoint") вместо "население", например: 

b[label='variable_x[1]=BARI_POP4_5_PRIMARY_CN.csv']

1 Ответ

0 голосов
/ 17 января 2019

Это то, что вы имели в виду? 

variable_x <- c("population", "timepoint", "endpoint")

cat(sprintf("digraph{
  graph[layout='dot',outputorder=edgesfirst,overlap=T,rankdir=LR]

  b[label='%s=BARI_POP4_5_PRIMARY_CN.csv']
  c [label='timepoint=12']
  d[label='endpoint=ACR50']
  b->c[label='']
  c->d[label='']
  }", variable_x[1])
)

Выход: 

digraph{
  graph[layout='dot',outputorder=edgesfirst,overlap=T,rankdir=LR]

  b[label='population=BARI_POP4_5_PRIMARY_CN.csv']
  c [label='timepoint=12']
  d[label='endpoint=ACR50']
  b->c[label='']
  c->d[label='']
  }
...