就我的论文而言，我试图对两个方程进行看似无关的回归，除了两个因变量外，它们完全相同。我想寻找离线和在线购物渠道中忠诚度之间的关系差异。该数据是李克特量表数据和一些用于通道偏好的二进制变量。我是R的新手，很难找出解决错误的方法。
当我执行以下代码时，它确实会给我输出，但是我不知道这是否看似无关的回归：
mlm2 <-lm（cbind（loyalonline，loyaloffline）〜Channel_preference_offline + Channel_preference_online + X.shop.on + X.shop.off +集成+ servqual_online + servqual_offline + assortment_online + assortment_offline + price_online + price_offline +图像+图像= surveydata2）
我知道这是SUR，但会导致错误：
eq1 <-忠诚在线〜Channel_preference_offline + Channel_preference_online + X.shop.on + X.shop.off +集成+ servqual_online + servqual_offline + assortment_online + assortment_offline + price_online + price_offline + image_offline + image_online
eq2 <-忠诚在线〜Channel_preference_offline + Channel_preference_online + X.shop.on + X.shop.off +集成+ servqual_online + servqual_offline + assortment_online + assortment_offline + price_online + price_offline + image_offline + image_online
fitsur <-systemfit（list（ eq1 ， eq2 ），“ SUR”，data = surveydata2） 摘要（fitsur）
这是导致的错误：
solve（sigma，tol = solvetol）中的错误： Lapack例程dsptrf返回了错误代码1
这里有人知道如何解决吗？