如果在r markdown中循环

Question

嗨有一个计算生成的数据框。这个数据框将包含其他计算的结果，最后它将具有类似的结果。

最低工作代码

```{r echo = FALSE, message=FALSE, } 
        cond_a <- c(1,2,3,4)
        cond_b <- c("a","v","b","c")
        reminder <- c(3,4,6,7)
        Diff <- c(0,1,0,0)
        df = data.frame(cond_a, cond_b, reminder, Diff)       # df is a data frame
        df$Result <- ifelse(df$Diff !=0, "FAIL", "PASS")
        Test_Results <- subset(df, Diff != 0)

```

在生成数据帧之后，我将整个事情放在一个R markdown文档中，并希望以一种方式打印它，如果数据帧有0行，那么我想打印 - “测试用例通过”，如果是数据帧有一些行（即失败的记录），然后我想打印数据帧。

```{r echo = FALSE, message=FALSE, }
    if {nrow(Test_Results) = 0
    print("Test case Passed")}
    else {
     DT::datatable(Test_Results)  
    }
```

到目前为止，我无法产生预期的结果。请帮忙。