如何在 R 中复制 Excel 的 COUNTIF？答案

【问题标题】：How to replicate Excel's COUNTIF in R?如何在 R 中复制 Excel 的 COUNTIF？
【发布时间】：2019-06-27 09:04:07
【问题描述】：

如何在R中写下Excel代码？

COUNTIF($A$4:A4,A4)

我有 > 100k 行数据，我想在其中获取 COUNTIF($A$4:A4,A4) = 1 值。我可以在 Excel 中做到这一点，但是，我在 R

中遇到了问题

Date            Worker ID

10/31/2017     3152
9/30/2017      3152
8/31/2017      3152
7/31/2017      3152
6/30/2017      3152
5/31/2017      3152
4/30/2017      3152
3/31/2017      3152
2/28/2017      3153
1/31/2017      3153
12/31/2016     3153
11/30/2016     3153
10/31/2017     3153
9/30/2017      3153
8/31/2017      3153
7/31/2017      3153
6/30/2017      3153
5/31/2017      3940
4/30/2017      3940
3/31/2017      3940
2/28/2017      3940
1/31/2017      3940

我有相同的数据集，有 25 列，每行都有不同的数据集，但最新/最后日期有更新信息。我想选择员工的最新日期行。

【问题讨论】：

能否提供您的数据样本和预期结果？
总和（x == 值）
日期工人 ID 10/31/2017 3152 9/30/2017 3152 8/31/2017 3152 7/31/2017 3152 6/30/2017 3152 5/31/2017 3152 4/30 /2017 3152 3/31/2017 3152 2/28/2017 3153 1/31/2017 3153 12/31/2016 3153 11/30/2016 3153 10/31/2017 3153 9/30/2017 3153 8/31/201 3153 7/31/2017 3153 6/30/2017 3153 5/31/2017 3940 4/30/2017 3940 3/31/2017 3940 2/28/2017 3940 1/31/2017 3940 我有相同的数据集有 25 列，其中每行都有不同的数据集，但最新/最后日期已更新信息。我想选择员工的最新日期行。
您能否提供一个 R 代码中的数据样本，以及您希望它计算某事与何时不计算某事的情况？

标签： r dataframe excel-formula

【解决方案1】：

您可以使用数据框子集和duplicated函数来模仿Excel的COUNTIF。请看下面的代码：

df <- structure(list(Date = structure(c(2L, 12L, 11L, 10L, 9L, 8L, 
7L, 6L, 5L, 1L, 4L, 3L, 2L, 12L, 11L, 10L, 9L, 8L, 7L, 6L, 5L, 
1L), .Label = c("1/31/2017", "10/31/2017", "11/30/2016", "12/31/2016", 
"2/28/2017", "3/31/2017", "4/30/2017", "5/31/2017", "6/30/2017", 
"7/31/2017", "8/31/2017", "9/30/2017"), class = "factor"), Worker_ID = c(3152L, 
3152L, 3152L, 3152L, 3152L, 3152L, 3152L, 3152L, 3153L, 3153L, 
3153L, 3153L, 3153L, 3153L, 3153L, 3153L, 3153L, 3940L, 3940L, 
3940L, 3940L, 3940L)), class = "data.frame", row.names = c(NA, 
-22L))


df[!duplicated(df$Worker_ID), ]

输出：

         Date Worker_ID
1  10/31/2017      3152
9   2/28/2017      3153
18  5/31/2017      3940

【讨论】：