布尔结果显示为FALSE，应返回TRUE

Posted 2021-04-14

如果[list1$b]存在，那么布尔值如何变为FALSE？请参阅以下代码中的步骤4。由于值FALSE，if语句将不会被执行。

其他观察：我还注意到，在第二次运行总脚本时，脚本声明list1中缺少'a'。添加'，即使[list1 $ a]确实存在。

想要的行为/结果：如果[list1$b]存在设置boolean到TRUE并运行if statement。此外，在第二轮总脚本中，[list1 $ a]应该检测到[list1 $ a]存在。

##########
# Step-1 #
##########
# Create list [list1] if missing.
if (!exists('list1')) {
  list1 <- list()
}

##########
# Step-2 #
##########
# Add variable [b] in list [list1].
list1$b <- 1

##########
# Step-3 #
##########
# Create variable [a] in list [list1] if missing.
if (!'a' %in% list1)  {
  print ('a is missing in list1. Adding a')
  list1$a <- 2
}

##########
# Step-4 #
##########
# Execute only print, if variable [b] in list [list1] exists. 
# Note! Even though variable [b] in list [list1] exists, the boolean result is FALSE.
if ('b' %in% list1)  {
  print ('b exists in list1. Do nothing')
}

# Print-out boolean result of Step-4:
boolean.result.of.step.four <- ('b' %in% list1)
print (paste0('Boolean result of step-4: ', boolean.result.of.step.four))

答案

'b'是list1中物体的名称。 %in%匹配值向量中的值。

如果你创建list1作为包含值'b'的列表，你的条件将是TRUE。看到：

list1 <- list('b')
> 'b' %in% test1
[1] TRUE

在你的情况下，你可以匹配'b'与矢量names(list1)。因此，在你的'b' %in% names(list1)条件下使用if来使它工作。