I am not familiar with DiagrammeR but I would like to try. Can adding the width and height arguments to node_options achieve what you want?
library(lavaan)
HS.model <- ' visual =~ x1 + x2 + x3
textual =~ x4 + x5 + x6
speed =~ x7 + x8 + x9 '
fit <- cfa(HS.model, data = HolzingerSwineford1939)
library(lavaanPlot)
lavaanPlot(model = fit,
graph_options = list(overlap = "TRUE", fontsize = "15"),
node_options = list(shape = "box", fontname = "Helvetica",
width = 1.5,
height = 1),
edge_options = list(color = "blue"),
coefs = TRUE,
stand = F,
#covs= TRUE
sig = 0.10,
stars = "regress"
)
lavaanPlot(model = fit,
graph_options = list(overlap = "TRUE", fontsize = "15"),
node_options = list(shape = "box", fontname = "Helvetica",
width = 1,
height = 1),
edge_options = list(color = "blue"),
coefs = TRUE,
stand = F,
#covs= TRUE
sig = 0.10,
stars = "regress"
)
-- Shu Fai