@@ -35,14 +35,13 @@ mock_user_rel_data <- function () {
35
35
timestamp_minus_year <- as.POSIXct (" 2023-01-01T00:00:01" )
36
36
37
37
commits <- data.frame (
38
- org = rep (" org" , 2L ),
39
- repo = c (" one" , " two" ),
40
- timestamp = rep (timestamp , 2L ),
41
- stargazers = 1 : 2
38
+ repo = paste0 (" org" , c (" one" , " two" )),
39
+ num_commits = 1 : 2 ,
40
+ date = rep (timestamp , 2L )
42
41
)
43
42
44
43
commit_cmt <- data.frame (
45
- repo = paste0 ( commits $ org , commits $ repo , collapse = " / " ) ,
44
+ repo = commits $ repo ,
46
45
num_commits = 1 : 2 ,
47
46
date = rep (timestamp , 2L )
48
47
)
@@ -52,7 +51,7 @@ mock_user_rel_data <- function () {
52
51
issues <- data.frame (
53
52
opened_at = rep (timestamp , 2L ),
54
53
closed_at = rep (timestamp , 2L ),
55
- org_repo = paste0 ( commits $ org , commits $ repo , collapse = " / " ) ,
54
+ org_repo = commits $ repo ,
56
55
issue_num = 1 : 2 ,
57
56
num_issue_comments = 3 : 4 ,
58
57
num_issue_participants = 5 : 6 ,
@@ -63,7 +62,7 @@ mock_user_rel_data <- function () {
63
62
attr (issues , " ended_at" ) <- timestamp
64
63
65
64
issue_cmts <- data.frame (
66
- org_repo = paste0 ( commits $ org , commits $ repo , collapse = " / " ) ,
65
+ org_repo = commits $ repo ,
67
66
issue_num = 1 : 2 ,
68
67
created_at = rep (timestamp , 2L ),
69
68
num_comments = 1 : 2 ,
0 commit comments