Retrieve the name of the last commentator
author_last_comment(x)
# S3 method for class 'IssueTB'
author_last_comment(x)
# S3 method for class 'IssuesTB'
author_last_comment(x)A string with the name of the last person which leaves a comment. If there is no comments, it returns an empty string.
all_issues <- get_issues(
source = "local",
dataset_dir = system.file("data_issues", package = "IssueTrackeR"),
dataset_name = "open_issues.yaml"
)
#> Looking into open_issues.yaml ...
#> The issues will be read from /home/runner/work/_temp/Library/IssueTrackeR/data_issues/open_issues.yaml.
author_last_comment(all_issues)
#> [1] "" "Immurb" "TanguyBarthelemy" ""
#> [5] "Immurb" "" "TanguyBarthelemy" ""
#> [9] "" "palatej" "palatej" ""
#> [13] "" "" "" ""
#> [17] "MichelleHedger" "" "annasmyk" ""
#> [21] "" "" "" ""
#> [25] "TanguyBarthelemy" "charphi" "" ""
#> [29] "" "" "annasmyk" ""
#> [33] "" "" "" ""
#> [37] "a-s-russo" "" "TanguyBarthelemy" "Ciamman"
#> [41] "" "" "a-s-russo" "charphi"
#> [45] "a-s-russo" "a-s-russo" "CyLuGh" ""
#> [49] "Immurb" "" "" "Immurb"
#> [53] "" "a-s-russo" "" "charphi"
#> [57] "Immurb" "" "" ""
#> [61] "a-s-russo" "palatej" "AQLT" ""
#> [65] "" "" "" "a-s-russo"
#> [69] "Immurb" "a-s-russo" "Immurb" ""
#> [73] "" "a-s-russo" "charphi" "a-s-russo"
#> [77] "" "charphi" "" "palatej"
#> [81] "" "" "" "a-s-russo"
#> [85] "" "annasmyk" "charphi" "charphi"
#> [89] "" "charphi" "charphi" ""
#> [93] "charphi" "charphi" "AQLT" ""
#> [97] "charphi"
author_last_comment(all_issues[1L, ])
#> [1] ""