add minimal unit tests for each function in optional_eml_elements.R

add minimal unit tests for each function in optional_eml_elements.R #29