Setter for CommentLine
Examples
apm_file <- system.file("css_data/MeasPattern.txt", package = "SeaSondeR")
apm_obj <- seasonder_readSeaSondeRAPMFile(apm_file)
#> seasonder_createSeaSondeRAPM: APM object created successfully.
new_comment_line <- "Test comment"
apm_obj <- seasonder_setSeaSondeRAPM_CommentLine(apm_obj, new_comment_line)
print(attributes(apm_obj)$CommentLine)
#> [1] "Test comment"