我来帮你理清这个问题——你犯的是一个很容易混淆的小错误，核心是没匹配好init参数结构和链数的对应关系！

错误原因分析 #

你设置了chains = 1（只跑1条链），但给init传递了两个子列表：list( list(mu = 0.5), list(sigma = 0.5) )。根据cmdstanr的规则：

• init的顶级列表长度必须和你指定的链数完全一致
• 每个子列表对应一条链的初始值设置，子列表里可以包含该链需要指定的参数（未指定的参数会使用默认初始值）

所以当链数是1时，init只能有1个子列表，你传了2个，自然就触发了长度不匹配的错误。

正确的初始值设置方式 #

单链场景（你的情况）

因为你只跑1条链，所以init应该是一个包含1个子列表的顶级列表，把要设置的参数都放在这个子列表里：

fit1 <- mod$sample(
  data = data_list,
  chains = 1,
  iter_sampling = 2000,
  init = list( list(mu = 0.5, sigma = 0.5) )
)

多链场景（拓展参考）

如果要跑多条链，比如3条，你可以给每条链单独设置初始值，此时init需要包含3个子列表：

fit_multi <- mod$sample(
  data = data_list,
  chains = 3,
  iter_sampling = 2000,
  init = list(
    list(mu = 0.5, sigma = 0.5),  # 第1条链的初始值
    list(mu = 0.2, sigma = 0.8),  # 第2条链的初始值
    list(mu = -0.3)               # 第3条链只设置mu，sigma用默认值
  )
)

简化写法：所有链用相同初始值

如果所有链都想用一样的初始值，你甚至可以直接传一个单级列表，cmdstanr会自动把它应用到所有链上：

fit_same_init <- mod$sample(
  data = data_list,
  chains = 3,
  iter_sampling = 2000,
  init = list(mu = 0.5, sigma = 0.5)
)

内容的提问来源于stack exchange，提问作者JeremyC