计算线性佣金 - 寻找公式

Question

使用R，有没有一个公式可以帮助我根据这个条件计算销售佣金。例如：

如果增长率（%）在 5% 到 7% 之间，那么销售员将收到佣金，佣金在 10% 到 12.5% 之间呈线性关系

变量：

TargetAmt<-100
Earned<-105.6
PctGrowth<-((Earned-TargetAmt)/TargetAmt)*100
PctGrowth

5.6

因此，我现在需要计算他的佣金，从 10% 到 12.5% 是线性的。

我可以通过计算线的斜率手动完成此操作。但是，我如何在 R 中执行此操作？

Answer 1

1) lm 对于 5.6% 的增长，佣金是 10.6%

growth <- c(5, 7)
commission <- c(10, 12.5)

fit <- lm(commission ~ growth)
predict(fit, list(growth = 5.6))
##     1 
## 10.75

1a) 或者，我们可以从线性回归中得到公式，然后自己应用它。在这种情况下，斜率为 1.25，截距为 3.75：

> fit
Call:
lm(formula = commission ~ growth)

Coefficients:
(Intercept)       growth  
       3.75         1.25

所以佣金是增长百分比的1.25倍加上3.75个百分点，即1.25 * 5.6 + 3.75 = 10.75。

2) 大约 另一种方法是这样使用approx：

approx(growth, commission, xout = 5.6)$y
## [1] 10.75

Answer 2

备选方案

求直线方程

使用 y = mx + c:

m = (0.125 - 0.1)/(0.07-0.05)
m = 0.025/0.02
m = 1.25

将0.1（10%）和0.05（5%）代入方程得到c

y = 1.25x + c
0.1 = (1.25 * 0.05) + c
0.1 - (1.25 * 0.05) = c
c = 0.0375

我们现在有了这条线的方程式：

y = 1.25x + 0.0375

代码:

TargetAmt <- 100
Earned <- 105.6

profitAsDecimal = (Earned/TargetAmt) - 1
commission = (1.25 * profitAsDecimal) + 0.0375
commissionAsDecimal = (1.25 * profitAsDecimal) + 0.0375

因此，对于 5.6 的增长，您的 commissionAsDecimal 将为 0.1075。乘以 100 得到 10.75 的百分比。

这个答案会给你一个从 5% 到 7% 等于 10% 到 12.5% 的线性结果。上面的答案是从 10% 到 12%

计算线性佣金 - 寻找公式

Calculate linear commission - Looking for a formula

r

linear-programming

algebra