search

cjvanlissa / tidySEM

55 stars 7 forks source link

Feature request: more location of connection for nodes #97

Open perlatex opened 3 months ago

perlatex commented 3 months ago 
library(tidyverse)
library(lavaan)
library(tidySEM)

HS.model <- ' 
   ind60 =~ x1 + x2 + x3 
   dem60 =~ y1 + y2 + y3 + y4 
   dem65 =~ y5 + y6 + y7 + y8 
'

fit <- cfa(HS.model, data = PoliticalDemocracy)

g <- fit %>% prepare_graph()

edges(g) %>% 
  select(from, to, arrow, label, connect_from, connect_to, label_results) %>% 
  filter(str_detect(label_results, ".WITH."))
#>    from    to arrow   label   connect_from   connect_to    label_results
#> 1 ind60 dem60  none  0.66**         left      right         ind60.WITH.dem60
#> 2 ind60 dem65  none 0.77***       bottom        top        ind60.WITH.dem65
#> 3 dem60 dem65  none 4.49***        right       left        dem60.WITH.dem65

there are only four positions available for connecting oval nodes c("bottom", "top", "left", "right"). Could you provide more options, such as "topright" and "bottomleft"? Thanks!