-
Notifications
You must be signed in to change notification settings - Fork 2
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
Features and fixes #28
Conversation
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Looks good
R/lastdose.R
Outdated
comments <- rep(comments,nrow(data)) | ||
} | ||
if(!length(comments)==nrow(data)) { | ||
stop("'comments' must be have length equal to the number of rows in 'data'",call.=FALSE) | ||
if(!length(comments) == nrow(data)) { |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
Is this:
if(!length(comments) == nrow(data)) {
identical to:
if(length(comments) != nrow(data)) {
When I run !length(comments)
by itself I get FALSE
, so wanted to confirm the functionality.
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
looks good
Summary
add option
lastdose.include_tafd
add option
lastdose.id_col
add option
lastdose.time_col
handle missing values in time column
include_tafd
now defaults toFALSE
tests for handling missing values in TIME
search for ID column using
find_id_col()
search for time column using
find_time_col()
See #25, #27, #29, #30