Skip to content

Commit

Permalink
remove package
Browse files Browse the repository at this point in the history
  • Loading branch information
super-lou committed Jul 15, 2022
1 parent 50f00ae commit f199be9
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions R/correction.R
Original file line number Diff line number Diff line change
Expand Up @@ -365,22 +365,22 @@ sampling_data = function (df_data, df_meta, hydroPeriod=c('05-01', '11-30'), Cod
df_data = filter(df_data,
(mStart < lubridate::month(Date) |
(mStart == lubridate::month(Date) &
dStart <= day(Date)))
dStart <= lubridate::day(Date)))
&
(lubridate::month(Date) < mEnd |
(lubridate::month(Date) == mEnd &
day(Date) <= dEnd))
lubridate::day(Date) <= dEnd))
)

} else {
df_data = filter(df_data,
(lubridate::month(Date) < mEnd |
(lubridate::month(Date) == mEnd &
day(Date) <= dEnd))
lubridate::day(Date) <= dEnd))
|
(mStart < lubridate::month(Date) |
(mStart == lubridate::month(Date) &
dStart <= day(Date)))
dStart <= lubridate::day(Date)))
)
}

Expand Down

0 comments on commit f199be9

Please sign in to comment.