more refactoring of ggcoefstats using insight
#314
Conversation
|
R/ggbarstats.R:70:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:196:1: style: functions should have cyclomatic complexity of less than 15, this has 33. ggbetweenstats <- function(data,
^R/ggcoefstats.R:303:1: style: functions should have cyclomatic complexity of less than 15, this has 58. ggcoefstats <- function(x,
^R/ggcorrmat.R:167:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:79:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:110:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:96:1: style: functions should have cyclomatic complexity of less than 15, this has 34. ggscatterstats <- function(data,
^R/ggwithinstats.R:63:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggwithinstats <- function(data,
^R/helpers_ggbetweenstats_graphics.R:369:26: style: ggsignif_xy(data %>% dplyr::pull({{ x }}), data %>% dplyr::pull({{ y }}))
~~^R/helpers_gghistostats_graphics.R:48:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~ |
1 similar comment
|
R/ggbarstats.R:70:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:196:1: style: functions should have cyclomatic complexity of less than 15, this has 33. ggbetweenstats <- function(data,
^R/ggcoefstats.R:303:1: style: functions should have cyclomatic complexity of less than 15, this has 58. ggcoefstats <- function(x,
^R/ggcorrmat.R:167:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:79:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:110:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:96:1: style: functions should have cyclomatic complexity of less than 15, this has 34. ggscatterstats <- function(data,
^R/ggwithinstats.R:63:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggwithinstats <- function(data,
^R/helpers_ggbetweenstats_graphics.R:369:26: style: ggsignif_xy(data %>% dplyr::pull({{ x }}), data %>% dplyr::pull({{ y }}))
~~^R/helpers_gghistostats_graphics.R:48:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~ |
Codecov Report
@@ Coverage Diff @@
## master #314 +/- ##
=====================================
Coverage 100% 100%
=====================================
Files 27 27
Lines 3289 3263 -26
=====================================
- Hits 3289 3263 -26
|
|
R/ggbarstats.R:70:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:196:1: style: functions should have cyclomatic complexity of less than 15, this has 33. ggbetweenstats <- function(data,
^R/ggcoefstats.R:303:1: style: functions should have cyclomatic complexity of less than 15, this has 58. ggcoefstats <- function(x,
^R/ggcorrmat.R:167:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:79:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:110:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:96:1: style: functions should have cyclomatic complexity of less than 15, this has 34. ggscatterstats <- function(data,
^R/ggwithinstats.R:63:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggwithinstats <- function(data,
^R/helpers_ggbetweenstats_graphics.R:369:26: style: ggsignif_xy(data %>% dplyr::pull({{ x }}), data %>% dplyr::pull({{ y }}))
~~^R/helpers_gghistostats_graphics.R:48:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~ |
1 similar comment
|
R/ggbarstats.R:70:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:196:1: style: functions should have cyclomatic complexity of less than 15, this has 33. ggbetweenstats <- function(data,
^R/ggcoefstats.R:303:1: style: functions should have cyclomatic complexity of less than 15, this has 58. ggcoefstats <- function(x,
^R/ggcorrmat.R:167:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:79:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:110:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:96:1: style: functions should have cyclomatic complexity of less than 15, this has 34. ggscatterstats <- function(data,
^R/ggwithinstats.R:63:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggwithinstats <- function(data,
^R/helpers_ggbetweenstats_graphics.R:369:26: style: ggsignif_xy(data %>% dplyr::pull({{ x }}), data %>% dplyr::pull({{ y }}))
~~^R/helpers_gghistostats_graphics.R:48:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~ |
No description provided.