Messy cfa printout Lavaan semPaths

[student92]

Hello all,

I'm quite a beginner with R and I'm trying to do an understandable printout of cfa using semPath. The problem is that the printout is extremely messy. Any advice to make it clearer?

Here is dummy data having same amount of factors as I have in my data.

df <- data.frame(PK1 = c(3,5,4,3,4,5),
PK2 = c(5,3,2,2,2,2),
PK3 =  c(2,2,2,3,4,5),
PK4 =  c(5,4,5,3,5,5),
FK5 =  c(4,5,4,4,4,4),
FK6 =  c(1,4,1,4,5,2),
FK7 =  c(4,2,1,3,2,2),
FK8 =  c(2,3,1,4,5,2),
FK9 = c(2,2,1,1,2,2),
TK10 =  c(1,2,1,4,5,2),
TK11 =  c(2,2,3,4,5,2),
TK12 =  c(1,2,4,4,5,2),
TK13 =  c(1,2,1,4,5,2),
ET14 =  c(1,4,4,5,3,4),
ET16 =  c(4,2,1,4,5,2),
ET17 =  c(3,2,3,4,4,4),
IT18 =  c(3,2,1,2,5,2),
IT19 =  c(4,2,2,4,5,2),
IT20 =  c(1,2,1,2,3,3),
AT21 = c(1,2,4,2,4,4),
AT22 =  c(1,2,1,2,5,3),
AT23 =  c(5,4,1,4,3,4),
AT24 =  c(4,2,1,5,5,2),
ALA25 =  c(4,2,1,4,5,3),
ALA26 =  c(5,2,2,2,5,1),
ALA27 =  c(1,5,1,3,5,2),
ALA28 = c(1,2,1,3,5,5),
P29 =  c(1,2,1,5,5,2),
P30 =  c(3,5,1,4,5,2),
P31 =  c(3,4,5,4,2,2),
S32 =  c(2,2,1,4,5,1),
S33 =  c(1,2,1,4,4,1),
S34 =  c(1,2,2,5,5,2),
S35 =  c(1,5,5,3,5,2),
ET15 =  c(3,4,3,2,5,4))

model<-' 
PK =~ PK1+PK2+PK3+PK4 
FK =~ FK5+FK6+FK7+FK8+FK9 
TK =~ TK10+TK11+TK12+TK13 
ET =~ ET14+ET15+ET16+ET17 
IT =~ IT18+IT19+IT20 
AT =~ AT21+AT22+AT23+AT24 
ALA =~ ALA25+ALA26+ALA27+ALA28 
P =~ P29+P30+P31 
S =~ S32+S33+S34+S35'

fit<-cfa(model,data = df)

semPaths(fit, whatLabels="est",
         sizeMan = 10,
         node.width = 1,
         edge.label.cex = .75,
         style = "ram")

By this way, the outprint is not readable. Font is too small, narrows are small and not easy to follow..

Grateful for all advices!