Мы можем использовать uncount
library(dplyr)
library(tidyr)
df1 %>%
uncount(Count) %>%
as_tibble
# A tibble: 5 x 1
# Date
# <fct>
#1 1/1/2020
#2 1/1/2020
#3 1/1/2020
#4 1/1/2020
#5 1/1/2020
Если столбец 'Count' не является цифрой c, будет показано сообщение об ошибке, поскольку weights
должно быть цифрой c
df1 %>%
uncount(as.character(Count))
Ошибка: weights
должен вычисляться как число c вектор
В OP упоминается, что имеется NA
элементов. В этом случае используйте replace_na
для замены элементов NA на 0, а затем примените uncount
df1 %>%
uncount(replace_na(Count, 0))
data
df1 <- data.frame(Date = "1/1/2020", Count = 5)