model <- confmirt.model()
  F1 = 1,2,3,4-10
  F2 = 10-20
  (F1*F1) = 1,2,3,4-10
  COV = F1*F2
  PARTCOMP = 10
  SLOPE = F1@1 eq F1@2
  MEAN = F1 eq 1, F2 eq -1
  INT = 1@1 eq -0.5
  PRIOR = N(0,4)@1Run the code above in your browser using DataLab