@beauraines/sprint-tracker 0.6.17 → 0.6.18
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/CHANGELOG.md +7 -0
- package/R/combinedStats.R +7 -7
- package/package.json +1 -1
package/CHANGELOG.md
CHANGED
|
@@ -2,6 +2,13 @@
|
|
|
2
2
|
|
|
3
3
|
All notable changes to this project will be documented in this file. See [standard-version](https://github.com/conventional-changelog/standard-version) for commit guidelines.
|
|
4
4
|
|
|
5
|
+
### [0.6.18](https://github.com/beauraines/sprint-tracker/compare/v0.6.17...v0.6.18) (2024-06-05)
|
|
6
|
+
|
|
7
|
+
|
|
8
|
+
### Features
|
|
9
|
+
|
|
10
|
+
* **stats:** handles sprints with no stories/points ([6cc7c1c](https://github.com/beauraines/sprint-tracker/commit/6cc7c1c3d785c26deed92046327f2db0d92bbe9b))
|
|
11
|
+
|
|
5
12
|
### [0.6.17](https://github.com/beauraines/sprint-tracker/compare/v0.6.16...v0.6.17) (2024-05-20)
|
|
6
13
|
|
|
7
14
|
|
package/R/combinedStats.R
CHANGED
|
@@ -21,7 +21,7 @@ select
|
|
|
21
21
|
s.sprint_name,
|
|
22
22
|
s.start_date,
|
|
23
23
|
s.end_date,
|
|
24
|
-
so.story_points,
|
|
24
|
+
ifnull(so.story_points, so.issue_count) AS story_points, -- accounts for unpointed bug stories,
|
|
25
25
|
o.name as outcome,
|
|
26
26
|
o.id
|
|
27
27
|
from
|
|
@@ -38,7 +38,7 @@ select
|
|
|
38
38
|
s.sprint_name,
|
|
39
39
|
s.start_date,
|
|
40
40
|
s.end_date,
|
|
41
|
-
so.story_points,
|
|
41
|
+
ifnull(so.story_points, so.issue_count) AS story_points, -- accounts for unpointed bug stories,
|
|
42
42
|
o.name as outcome,
|
|
43
43
|
o.id
|
|
44
44
|
from
|
|
@@ -95,7 +95,7 @@ sprintData = sprintData %>%
|
|
|
95
95
|
|
|
96
96
|
sprintData = sprintData %>%
|
|
97
97
|
group_by(name) %>%
|
|
98
|
-
mutate(velocity = cumsum(completed)/sprint_number)
|
|
98
|
+
mutate(velocity = cumsum(replace_na(completed, 0))/sprint_number)
|
|
99
99
|
|
|
100
100
|
## Add Completion Percentage
|
|
101
101
|
sprintData = sprintData %>%
|
|
@@ -246,7 +246,7 @@ sql <- str_c("SELECT
|
|
|
246
246
|
|
|
247
247
|
from projects p
|
|
248
248
|
|
|
249
|
-
JOIN sprints s on s.project_id = p.id
|
|
249
|
+
LEFT JOIN sprints s on s.project_id = p.id
|
|
250
250
|
JOIN sprint_outcomes so on so.sprint_id = s.id
|
|
251
251
|
JOIN outcomes o on o.id = so.outcome_id
|
|
252
252
|
|
|
@@ -265,7 +265,7 @@ dbDisconnect(con)
|
|
|
265
265
|
|
|
266
266
|
outcomes <- outcomes %>%
|
|
267
267
|
tibble() %>%
|
|
268
|
-
filter(story_points != 0) %>%
|
|
268
|
+
# filter(story_points != 0) %>%
|
|
269
269
|
mutate(
|
|
270
270
|
end_date = as.Date(end_date)
|
|
271
271
|
)
|
|
@@ -274,12 +274,12 @@ outcomes <- outcomes %>%
|
|
|
274
274
|
|
|
275
275
|
entire_project_velocity = (outcomes %>%
|
|
276
276
|
filter(outcome == 'B-Delivered' ) %>%
|
|
277
|
-
summarize( average_velocity = mean(story_points)))$average_velocity
|
|
277
|
+
summarize( average_velocity = mean(story_points,na.rm = TRUE)))$average_velocity
|
|
278
278
|
|
|
279
279
|
average_velocity = (outcomes %>%
|
|
280
280
|
filter(outcome == 'B-Delivered') %>%
|
|
281
281
|
filter(!sprint_name %in% c('Accessibility Improvement 0','Accessibility Improvements 1')) %>%
|
|
282
|
-
summarize( average_velocity = mean(story_points)))$average_velocity
|
|
282
|
+
summarize( average_velocity = mean(story_points,na.rm = TRUE)))$average_velocity
|
|
283
283
|
|
|
284
284
|
# Compute 95% band velocity
|
|
285
285
|
|