Как использовать функцию фильтра, чтобы выбрать конкретные даты? - PullRequest
0 голосов
/ 07 мая 2019

Я не могу отфильтровать набор данных за определенную дату.

padf_12 <- read.table("Paddus_2012_sheet2.csv", head = TRUE, sep=";" )
tibble(padf_12)

padf_12 <- padf_12 %>% 
mutate_at(vars(Block, Treatment), factor) %>% 
mutate("Date"=dmy(Date, tz = "UTC"))

Я пробовал разные способы фильтрации данных, например,

padf_12 <- padf_12 %>%
filter_at(padf_12, vars(Date == "2012-08-14"))

и

padf_12 <- padf_12 %>%
filter(padf_12, Treatment == "2012-08-14")

Из-за кодов ошибок я пытался преобразовать мои даты в POSIXct

padf_12 <- padf_12 %>% 
mutate(as.POSIXct(padf_12$Date, tz="", format="%Y-%m-%d"))

Мои данные выглядят так:

Sample       Date     Time Plot Ch..Vol..L. Plot..old. iButton Treatment Block X2.methylbutyl.acetat X3.hexenyl.acetate
1 31-K1 20120522 2012-05-22 14:01:00   C1          13         K1  2198C9         C     1                  0.00               0.02
2 32-K1 20120613 2012-06-13 10:19:00   C1          13         K1  2198C9         C     1                  0.00               0.00
3 33-K1 20120626 2012-06-26 12:19:00   C1          13         K1   21980         C     1                  0.00               0.00
4 34-K1 20120715 2012-07-15 12:15:00   C1          13         K1  2198CD         C     1                  0.00               0.02
5 35-K1 20120814 2012-08-14            C1          13         K1                 C     1                  0.00               2.34
6 36-K2 20120522 2012-05-22 15:12:00   C2          13         K2  2198C9         C     2                  0.01               0.04

А вот ссылка на полный набор данных: https://www.dropbox.com/s/m4qfrdagqxvdxnh/Filtering%20problem.R?dl=0

Любая помощь очень ценится.

1 Ответ

0 голосов
/ 09 мая 2019

Удаление объекта данных в функции, как было предложено TinglTanglBob, сделало свое дело!

...