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] "" "" ""
#> [4] "" "charphi" ""
#> [7] "" "charphi" ""
#> [10] "" "" ""
#> [13] "" "palatej" "palatej"
#> [16] "JanGerhardt" "" "AQLT"
#> [19] "" "" ""
#> [22] "AQLT" "" "TanguyBarthelemy"
#> [25] "" "AlessandroPiovani" ""
#> [28] "TanguyBarthelemy" "" "palatej"
#> [31] "palatej" "" ""
#> [34] "" "MichelleHedger" "annasmyk"
#> [37] "" "" ""
#> [40] "" "" "TanguyBarthelemy"
#> [43] "charphi" "" ""
#> [46] "" "" ""
#> [49] "" "" ""
#> [52] "a-s-russo" "" "TanguyBarthelemy"
#> [55] "Ciamman" "" ""
#> [58] "a-s-russo" "charphi" "a-s-russo"
#> [61] "a-s-russo" "CyLuGh" ""
#> [64] "Immurb" "" ""
#> [67] "Immurb" "" "a-s-russo"
#> [70] "" "charphi" "Immurb"
#> [73] "" "" ""
#> [76] "a-s-russo" "palatej" "AQLT"
#> [79] "" "" ""
#> [82] "a-s-russo" "Immurb" "a-s-russo"
#> [85] "Immurb" "" ""
#> [88] "a-s-russo" "charphi" "a-s-russo"
#> [91] "" "charphi" ""
#> [94] "palatej" "" ""
#> [97] "" "a-s-russo" ""
#> [100] "annasmyk" "charphi" "charphi"
#> [103] "" "charphi" "charphi"
#> [106] "" "charphi" "charphi"
#> [109] "AQLT" "" "charphi"
author_last_comment(all_issues[1L, ])
#> [1] ""