R 使用虚拟变量从另一个变量提取信息

我有一个包含18个变量的数据集，我正在使用r。我的数据如下：（Decision_date是第一个变量）

---

任何帮助都将不胜感激。非常感谢

我对R也有点陌生。我以前是用其他语言的方式来做的。也许这会帮助你：

if(infringements$let == 1) {
  infringements$let_date <- infringements$Decision_date
}  

if（侵权$let==1）{
侵权$let_date我对R也有点陌生。我以前是用其他语言的方式来做的。也许这会帮助你：

if(infringements$let == 1) {
  infringements$let_date <- infringements$Decision_date
}  

if（侵权$let==1）{
侵权$let\u日期
精确子集，
侵权$Decision\u日期[侵权$let==1]
精确子集，
侵权$Decision\u日期[侵权$let==1]
谢谢你的回答，但是当我运行第二个代码时，我发现了这个错误：
中的错误$不客气！你能提供更多信息吗？当然。我使用这个代码没有问题：你能给我一些示例数据和完整的代码吗？也许你想看看我发布的链接。谢谢你迄今为止的帮助。我希望我添加的内容有助于使其更有意义。感谢您建议查看链接。感谢您的回答，但我在运行第二个代码时出现此错误：
$中的错误不客气！您可以提供更多信息吗？当然可以。我使用此代码时没有问题：您可以给我一些示例数据和完整代码吗？也许您想请看一看我发布的链接。感谢您迄今为止的帮助。我希望我添加的内容有助于它更有意义。感谢您建议查看链接。
let1 <- ifelse(infringements$Decision_type == "Formal notice Art. 258            
TFEU", yes = TRUE, no = FALSE)
let2 <- ifelse(infringements$Decision_type == "Formal notice Art. 106   
TFEU", yes = TRUE, no = FALSE)
let3 <- ifelse(infringements$Decision_type == "Formal notice Art. 258  
TFEU + Press release", yes = TRUE, no = FALSE)
let4 <- ifelse(infringements$Decision_type == "Formal notice Art. 260      
TFEU", yes = TRUE, no = FALSE)
 let5 <- ifelse(infringements$Decision_type ==  "Formal notice Art. 260     
 TFEU + Press release", yes = TRUE, no = FALSE)
 table(let2)

 infringements$let <- let1 + let2 + let3 + let4 + let5

 subSet <- infringements[infringements$let == 1,] 
infringements$let_date <- infringements$Decision_date[infringements$let           
 == 1]

let            let_date
1              2003-07-09 00:00:00.0
1              2004-07-09 00:00:00.0
1              2005-07-09 00:00:00.0

if(infringements$let == 1) {
  infringements$let_date <- infringements$Decision_date
}  

infringements$let_date <- infringements$Decision_date[infringements$let == 1]

df <- data.frame(infringements$let[infringements$let == 1], infringements$Decision_date[infringements$let == 1])