Skip to content
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

Readepi no HIS specific dependencies #80

Open
wants to merge 26 commits into
base: main
Choose a base branch
from

Conversation

Karim-Mane
Copy link
Member

This PR contains changes to update the data importing from servers function according to the design vignette.

@Karim-Mane Karim-Mane added the enhancement New feature or request label Jul 4, 2024
@Karim-Mane Karim-Mane self-assigned this Jul 4, 2024
Copy link
Contributor

@Degoot-AM Degoot-AM left a comment

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

@Karim-Mane, I will review the vignette next week. But in the functions diagram, change read_readcap to read_redcap

query <- sprintf("select * from %s", table_name)
} else if (!is.null(select) && is.null(filter)) {
# subset all rows and specified columns
target_columns <- paste(select, collapse = ", ")
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Suggested change
target_columns <- paste(select, collapse = ", ")
target_columns <- glue::glue_collapse(select, sep = ", ")

Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Thanks @Degoot-AM - I will update the figure accordingly.

paste() is no longer spotted out by lintr. I think it is better to use paste() and not glue_collapse() to avoid taking {glue} as a dependency.

} else {
# subset specified rows and all columns
target_columns <- ifelse(!is.null(select),
paste(select, collapse = ", "),
Copy link
Contributor

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Suggested change
paste(select, collapse = ", "),
glue::glue_collapse(select, sep = ", ")

Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

The same as above applies here too.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
enhancement New feature or request
Projects
Status: In Progress
Development

Successfully merging this pull request may close these issues.

3 participants