R 计算线性佣金-寻找公式

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

如果增长率（单位%）在5%至7%之间，则销售人员将获得10%至12.5%的线性佣金

变量包括：

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

对于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 

因此，佣金是增长率的1.25倍加上3.75个百分点，即1.25*5.6+3.75=10.75

2）近似值另一种方法是这样使用

近似值

：

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

增长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 

因此，佣金是增长率的1.25倍加上3.75个百分点，即1.25*5.6+3.75=10.75

2）近似值另一种方法是这样使用

近似值

：

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

---

替代解决方案

找到直线的方程

使用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

---

TargetAmt替代解决方案

找到直线的方程

使用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

target你的分数是（x1，y1）=（0.05，0.10）和（x2，y2）=（0.07，0.125）。只需使用直线的点斜率形式：y-y1=m*（x-x1），其中m=（y2-y1）/（x2-x1）。您的点是（x1，y1）=（0.05,0.10）和（x2，y2）=（0.07,0.125）。只需使用直线的点斜率形式：y-y1=m*（x-x1），其中m=（y2-y1）/（x2-x1）。这真的很好很简单，只是一件事，OP要求10-12.5的佣金。因此，请确保更改佣金，我将使用
approx
功能。这是最艰难的前进。谢谢你，谢谢你，格洛森迪克。这真的很好很简单，只是一件事，OP要求10-12.5的佣金。因此，请确保更改佣金，我将使用
approx
功能。这是最艰难的前进。谢谢，谢谢。你是对的。他打错了字。我知道这个概念。我想要R的配方。谢谢你的帮助。谢谢。你是对的。他打错了字。我知道这个概念。我想要R的配方。谢谢你的帮助。