We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents e515396 + 08020a7 commit 35d9deeCopy full SHA for 35d9dee
DataCleaningScripts/new_moon_numbers.r
@@ -56,7 +56,6 @@ update_moon_dates <- function() {
56
trappingdat$censusdate <- lubridate::as_date(paste(trappingdat$year,trappingdat$month,
57
trappingdat$day,sep='-'))
58
59
-
60
# proceed only if trappingdat has more recent dates than moon_dates
61
if (max(abs(trappingdat$period),na.rm=T) > max(abs(moon_dates$period),na.rm=TRUE)) {
62
0 commit comments