R中核回归条件判断代码优化疑问：ifelse能否执行多操作？

问题描述 #

我正在练习手写核回归代码，按照理解需要将数据分段，计算每段的x、y均值并绘图。编写了包含for循环与if判断的函数后，运行收到长度相关警告，仅第三段成功绘图。查询得知if函数无法处理向量，遂尝试嵌套ifelse，但嵌套后代码失效，单独编写各段逻辑却可正常运行。不清楚是嵌套写法有误，还是ifelse的TRUE分支无法执行多个操作。

可复现数据 #

conc = c(19.2, 19.37, 19.23, 19.21, 19.58, 18.94, 19.46, 18.96, 19.26, 18.96, 19.02, 18.90, 19.14, 19.54, 18.96, 18.84, 18.82, 19.45,
 19.59, 19.54, 18.93, 19.51, 19.31, 19.30, 19.05, 18.84, 19.44, 18.82, 19.33, 19.37, 19.00, 19.32, 19.00, 19.27)
effect = c(67.97, 67.72, 67.64, 67.99, 68.32, 67.12, 68.70, 66.92, 67.55, 66.89, 67.00, 66.87, 67.46, 68.45, 66.92, 66.80, 66.96, 67.81,
68.92, 68.57, 67.43, 68.42, 67.87, 67.87, 67.09, 66.83, 68.50, 66.85, 67.78, 67.69, 66.95, 67.49, 67.52, 68.19)

df = data.frame(conc=conc, effect=effect)

blokk = seq(19, 19.4 , 0.2)

后续排查发现 #

后续发现问题出在for循环，单独运行if语句逻辑可正常工作，但仍需解决for循环的问题，同时明确ifelse的TRUE分支是否能执行多个操作。

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