R中两个输出为数值向量的interpol函数为何一个可绘图一个失效

• 第一个核心问题是参数索引逻辑与实际传入参数类型不匹配
  在Shiny应用的plotData反应式中，调用interpol()时传入的第二个参数是input$myMatrixInput[1,(i*2-1):(i*2)]，这是从矩阵中取出的单行多列数据，返回值为一维数值向量，而非矩阵。但第二个interpol()中使用了sum(b[,1])、sum(b[,2])的矩阵列索引语法，该语法仅适用于二维矩阵对象，用于向量时会直接抛出维度错误。外层tryCatch捕获错误后返回NULL，renderPlot中的req(plotData())检测到空值就会终止绘图逻辑，因此没有输出。
  你在控制台测试时没有触发错误，是因为测试时给b传入的是矩阵类型，和Shiny运行时的实际传参场景不一致。
• 第二个次要问题是不必要的矩阵乘法运算符
  函数中使用%*%计算两个标量的乘积，返回的是1行1列的矩阵对象，虽然部分场景下R会自动强制转换为数值，但存在类型兼容风险，替换为普通的*算术乘法更稳妥。

interpol <- function(a, b) { # a = periods, b = vector inputs
  c    <- rep(NA, a)
  c[]  <- sum(b[1]) * sum(b[2])
  return(c)
}

修改说明：

1. 将b[,1]、b[,2]改为向量索引b[1]、b[2]，匹配传入的向量参数类型
2. 将矩阵乘法%*%替换为普通乘法*

内容的提问来源于stack exchange，提问作者Curious Jorge - user9788072