R 计算日期相同的行数

我有以下变量：

     datevote 
1   1981-6-21
2   1981-6-21
3   1981-9-23
4   1982-2-14
5   1982-2-14

等等

最后，我希望有一个新的列，其中显示了“datevote”列的相同日期数：

  datevote        numbervotes
1   1981-6-21     2
2   1981-6-21     2
3   1981-9-23     1
4   1982-2-14     2
5   1982-2-14     2

我试过几种方法，但效果似乎比预期的好。有人能帮我吗？

---

非常感谢您的帮助。

您可以像这样使用新的

dplyr

软件包

library(dplyr)
df <- data.frame(datevote = as.Date(c("1981-06-21", "1981-06-21", "1981-06-23", "1981-06-14", "1981-06-14")))

mutate(group_by(df, datevote), numbervotes = n(datevote))
##     datevote numbervotes
## 1 1981-06-21           2
## 2 1981-06-21           2
## 3 1981-06-23           1
## 4 1981-06-14           2
## 5 1981-06-14           2

---

您可以像这样使用新的

dplyr

包

library(dplyr)
df <- data.frame(datevote = as.Date(c("1981-06-21", "1981-06-21", "1981-06-23", "1981-06-14", "1981-06-14")))

mutate(group_by(df, datevote), numbervotes = n(datevote))
##     datevote numbervotes
## 1 1981-06-21           2
## 2 1981-06-21           2
## 3 1981-06-23           1
## 4 1981-06-14           2
## 5 1981-06-14           2

---

数据表备选方案：

df <- data.frame(datevote = as.Date(c("1981-06-21", "1981-06-21", "1981-06-23", "1981-06-14", "1981-06-14")))
library(data.table)
df <- data.table(df)
df[,numbervotes:=.N, by=datevote]
df

---

dfData.table备选方案：

df <- data.frame(datevote = as.Date(c("1981-06-21", "1981-06-21", "1981-06-23", "1981-06-14", "1981-06-14")))
library(data.table)
df <- data.table(df)
df[,numbervotes:=.N, by=datevote]
df

df感谢您的输入。不幸的是，它不起作用。R在nchar（值）中给出了一个
错误：无效的多字节字符串265
@Thomas请确保具有最新版本的
dplyr
。我还想知道当您复制和粘贴代码时，它是否正常工作？当我复制和粘贴代码时，R会告诉我：n中的错误（datevote）：未使用的参数（datevote）。@Thomas devtools:：install_github（“dplyr”）并重试。如果您仍然存在一些问题，请使用
plyr
解决方案谢谢您的意见。不幸的是，它不起作用。R在nchar（值）中给出了一个
错误：无效的多字节字符串265
@Thomas请确保具有最新版本的
dplyr
。我还想知道当您复制和粘贴代码时，它是否正常工作？当我复制和粘贴代码时，R会告诉我：n中的错误（datevote）：未使用的参数（datevote）。@Thomas devtools:：install_github（“dplyr”）并重试。如果您仍然存在一些问题，那么使用
plyr
解决方案我想
？ave
可能会有所帮助
ave（DF$datevote，DF$datevote，FUN=length）
，或者类似的东西，具体取决于
str（DF）
的输出。我想
？ave
可能会有所帮助
ave（DF$datevote，DF$datevote，FUN=length）
，或类似内容，具体取决于
str（DF）
的输出。