如何在R中通过向量编码递归函数？

问题描述

我有一个功能：（1-（x / d）） 其中d是向量（V）的成员 根据向量的长度，函数将如下所示： 例如向量是V [2，3.5，5，4.1] 所以功能应该是：

[(1-(x/2))*(1-(x/3.5))*(1-(x/5))*(1-(x/4.1))]

如果我给它另一个像[1.5，2]函数的矢量将是：

[(1-(x/1.5))*(1-(x/2))]

这意味着函数的形状取决于我的向量及其元素的长度。 我想要一个代码来创建此函数，然后通过在R中进行优化来找到其最大值。

解决方法

这是一种方法。函数CUSTOMER_ID,case when "1">150 then "1" end as "1",case when "2">150 then "2" end as "2",case when "3">150 then "3" end as "3",返回可以应用于向量*的函数。

f