检测数组的排序顺序

Question

有几种方法可以安排

library(dplyr)
df <- tibble(x = character(0))


df <- bind_rows(df, c("x" = "foo"))
df <- bind_rows(df, c("x" = "bar"))
df

# # A tibble: 2 x 1
#       x
#   <chr>
# 1   foo
# 2   bar

我想标记第三种情况，但是当我使用我的vba代码时，找到第四种情况，它也会被给出错误。 我希望你能给我一些建议，当我发现第四种情况时，不报告错误。

1. table 1, table 2, table 3, table 4, table, 5；  that is right  
2. table 1, table 2, table 3, table 3, table 4, table 5； that is right  
3. table 3, table 1, table 2, table 4, table 5:  that is incorrect.  
4. table 3, table 1, table 2, table 3, table 4, table 5:  that is right.