Как скопировать СЧЕТЧИК Excel в R?

Question

Как написать код Excel ниже в R?

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 столбцами, где у каждой строки есть свой набор данных, но последняя / последняя дата имеетобновленная информация.Я хочу выбрать последние строки даты сотрудника.

Answer 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