add combine_plots2 and refactor grouped_ functions
#364
Conversation
This comment has been minimized.
This comment has been minimized.
1 similar comment
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:199:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:165:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:80:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:98: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:160:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(7L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:162:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[6]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:465:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[3]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:467:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[5]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:474:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[3]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:476:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[5]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggscatterstats.R:64:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:133:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:135:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[6]]), c(3L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-helpers_ggbetweenstats.R:47:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb_mean$data[[3]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
1 similar comment
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
1 similar comment
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
1 similar comment
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:200:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:166:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:80:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:98: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:160:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(7L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:162:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[6]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:465:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[3]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:467:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[5]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:474:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[3]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggbetweenstats.R:476:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[5]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggscatterstats.R:64:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:133:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:135:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[6]]), c(3L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-helpers_ggbetweenstats.R:47:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb_mean$data[[3]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
This comment has been minimized.
This comment has been minimized.
1 similar comment
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
This comment has been minimized.
1 similar comment
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:200:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:166:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:81:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:98: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:200:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:166:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:81:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:99: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
1 similar comment
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:200:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:166:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:81:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:99: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:200:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:166:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:81:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:99: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
1 similar comment
|
R/ggbarstats.R:58:1: style: functions should have cyclomatic complexity of less than 15, this has 20. ggbarstats <- function(data,
^R/ggbetweenstats.R:200:1: style: functions should have cyclomatic complexity of less than 15, this has 31. ggbetweenstats <- function(data,
^R/ggcoefstats.R:284:1: style: functions should have cyclomatic complexity of less than 15, this has 61. ggcoefstats <- function(x,
^R/ggcorrmat.R:166:1: style: functions should have cyclomatic complexity of less than 15, this has 30. ggcorrmat <- function(data,
^R/gghistostats.R:81:1: style: functions should have cyclomatic complexity of less than 15, this has 24. gghistostats <- function(data,
^R/ggpiestats.R:103:1: style: functions should have cyclomatic complexity of less than 15, this has 22. ggpiestats <- function(data,
^R/ggscatterstats.R:99: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 29. ggwithinstats <- function(data,
^R/helpers_ggcoefstats_graphics.R:104:1: style: functions should have cyclomatic complexity of less than 15, this has 16. ggcoefstats_label_maker <- function(x,
^R/helpers_gghistostats_graphics.R:49:5: warning: local variable ‘label.value’ assigned but may not be used label.value <- x_pos
^~~~~~~~~~~tests/testthat/test-ggcoefstats.R:71:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb$data[[4]]), c(4L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:227:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*28)==118.89, ~italic(p)<= 0.001, ~widehat(italic(eta)[p]^2)==0.81)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:316:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==7.388, ~italic(p)== 0.001, ~widehat(italic(omega)[p]^2)==0.308)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:317:1: style: Lines should not be more than 100 characters. "list(~italic(F)(1*\",\"*35)==2.034, ~italic(p)== 0.163, ~widehat(italic(omega)[p]^2)==0.023)",
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggcoefstats.R:318:1: style: Lines should not be more than 100 characters. "list(~italic(F)(3*\",\"*35)==4.012, ~italic(p)== 0.015, ~widehat(italic(omega)[p]^2)==0.174)"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~tests/testthat/test-ggwithinstats.R:60:7: style: Commented code should be removed. # testthat::expect_equal(dim(pb1$data[[7]]), c(2L, 15L))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
No description provided.