如果ELSE逻辑条件语句不起作用

Question

我有一个看起来像这样的数据框

  df1
  1. AB-CD-XY 
  2. AC-BE-DF-GH

我想从最后一个连字符中删除以获得类似的内容：

 1. AB-CD
 2. AC-BE-DF

这是我的代码

library(stringr)
ifelse(str_count(df1,'-')==3, 
   df_strip<- sub("^([^-]*-[^-]*-[^-]*).*", "\\1",df1),
   df_strip<- sub("^([^-]*-[^-]*).*", "\\1", df1)
   )

目前我得到的结果显示只有我的代码的其他部分有效。 sub代码可以单独使用，但不能在ifelse语句中使用。

1. AB-CD
2. AC-BE

Answer 1

请勿在{{1​​}}

中使用“<-”

ifelse

另请注意，df1不是此处的数据框。