lavCor() gains a return.type argument (default = "cor")
change return.type argument in lavCor() to 'output'; added 'th' as an option