Fixing Psi as the average of two other Psi's (Multistate)

All, Currently I have created a multistate model in Rmark with a total of 6 states: 3 observable (A,B,C) and three unobservable (a,b,c). I would like to fix the transition from PsiAa to be the mean of PsiBb and PsiCc. Does anyone know how to code this in Rmark? I attempted to fix it using the code below but the result was not the mean of the other two estimates.
I also tried fixing PsiAa to PsiBb using the code below which also didn't give the same estimate for both transitions.
Thank you for your help!
-RB
- Code: Select all
w<-c(test.ddl$Psi$fix[test.ddl$Psi$stratum=="B"& test.ddl$Psi$tostratum=="b"],
test.ddl$Psi$fix[test.ddl$Psi$stratum=="C"& test.ddl$Psi$tostratum=="c"])
test.ddl$Psi$fix[test.ddl$Psi$stratum=="A"& test.ddl$Psi$tostratum=="a"] <- mean(w, na.rm = FALSE)
I also tried fixing PsiAa to PsiBb using the code below which also didn't give the same estimate for both transitions.
- Code: Select all
test.ddl$Psi$fix[test.ddl$Psi$stratum=="A"& test.ddl$Psi$tostratum=="a"] <-test.ddl$Psi$fix[test.ddl$Psi$stratum=="B"& test.ddl$Psi$tostratum=="b"]
Thank you for your help!
-RB