if语句有语法错误

Question

我有以下问题：

在导入的数据框中，我需要创建一个名为“profit_margin_flag”的新列，其值的计算方法如下[利润率=利润/销售额]。

a。如果利润率为负，则新列的值应为“负数”。

b。如果利润率为正且小于10％，则新列应具有“低利润”值。

c。如果利润率为10％或更高，但低于25％，则新列应具有“标准保证金”值。

d。如果利润率为50％或更高，新列应具有“高利润率”的值。

我编码了这个：

orders$profit_margin_flag <- orders$Profit/orders$Sales
n <- nrow(orders)
`for (i in (1:n))`
{
if(orders$profit_margin_flag[i] < 0)
{orders$profit_margin_flag[i] <- "negative"}
  else if(orders$profit_margin_flag[i] >0 && <.10)
    {orders$profit_margin_flag[i]<- "low margin"}
else if(orders$profit_margin_flag[i] >= .10 && < .25)
  {orders$profit_margin_flag[i]<- "standard margin"}
 else if(orders$profit_margin_flag[i] >= .50) 
   {orders$profit_margin_flag[i]<- "high margin"}
}

我收到此错误：

else if(orders$profit_margin_flag[i] >0 && <.10)
#Error: unexpected 'else' in "  else"
#     {
+      orders$profit_margin_flag[i]<- "low margin"
+   }

else if(orders$profit_margin_flag[i] >= .10 && < .25)
Error: unexpected 'else' in "else"

{orders $ profit_margin_flag [i] < - “标准保证金”}否则如果（订单$ profit_margin_flag [i]> =。50）错误：“其他”中的意外“其他”{orders $ profit_margin_flag [i] < - “高利润率“}}错误：”}中出现意外'}'

Answer 1

正如@mickey指出的那样， && < .10是无效的语法。

话虽如此，你想用“负面”等替换profit_margin_flag的值（正如你在OP中具体的那样），还是要将它分配给一个新的变量？

我稍微清理了你的代码（将标志分配给一个新的变量profit_margin_flag ，边缘值最初存储在profit_margin ），这应该有效。

orders <- data.frame(profit_margin = c(-2, 0.07, 0.14, 11), profit_margin_flag = rep_len(NA, 4))

for(i in 1:nrow(orders)){
 +   if(orders$profit_margin[i] < 0){
 +     orders$profit_margin_flag[i] <- "negative"
 +   }
 +   else if(orders$profit_margin[i] > 0 && orders$profit_margin[i] < 0.10){
 +     orders$profit_margin_flag[i]<- "low margin"
 +   }
 +   else if(orders$profit_margin[i] >= 0.10 && orders$profit_margin[i] < 0.25)
 +   {
 +     orders$profit_margin_flag[i]<- "standard margin"
 +   }
 +   else if(orders$profit_margin[i] >= 0.50) 
 +   {
 +     orders$profit_margin_flag[i]<- "high margin"
 +   }
 + }

orders
#   profit_margin profit_margin_flag
# 1         -2.00           negative
# 2          0.07         low margin
# 3          0.14    standard margin
# 4         11.00        high margin