Closed JoyBaule closed 1 month ago
This element has been removed from the USHE Courses Data Glossary and is no longer needed for reporting.
Can this be marked as inactive so that it will not show up in the submission file?
https://github.com/ut-effectiveness/usheUtils/blob/ad2d12652346dd5fb73d1acc9cf45528195c3a51/R/courses.R#L1412C1-L1440C2
c_43 <- function(input_df=usheUtils::fake_course_df) {
output_df <- input_df %>%
mutate( c_instruct_name = paste0(instructor_last_name, ', ', instructor_first_name, ' ', instructor_middle_name) ) %>% # Append USHE data element c_43 mutate( c_43 = c_instruct_name )
return(output_df) }
Closed with pull request #14, this removes element c_43 Instructor Name in the Courses file submission.
This element has been removed from the USHE Courses Data Glossary and is no longer needed for reporting.
Can this be marked as inactive so that it will not show up in the submission file?
https://github.com/ut-effectiveness/usheUtils/blob/ad2d12652346dd5fb73d1acc9cf45528195c3a51/R/courses.R#L1412C1-L1440C2
' Calculate USHE Element c_43 (Instructor Name)
'
' @details
'
' USHE Documentation
'
' @importFrom magrittr %>%
' @importFrom dplyr mutate
' @importFrom dplyr select
'
' @param input_df A Data Frame. Must contain the following data fields: (instructor_first_name, instructor_last_name, instructor_middle_name).
'
'
' @return Original data frame, with USHE data element c_43 appended.
' @export
'
' @examples
' c_43()
'
c_43 <- function(input_df=usheUtils::fake_course_df) {
output_df <- input_df %>%
Calculate intermediate fields
return(output_df) }