fixed ggplot2 deprecation warning

nppackages · Oct 10, 2024 · 2519ae0 · 2519ae0
1 parent 8a96c50
commit 2519ae0
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 6 deletions.
diff --git a/R/lpcde/R/lpcde_methods.R b/R/lpcde/R/lpcde_methods.R
@@ -812,15 +812,15 @@ plot.lpcde = function(..., alpha=NULL,type=NULL, lty=NULL, lwd=NULL, lcol=NULL,
     if (type[i]%in%c("line", "both")) {
       temp_plot = temp_plot + ggplot2::geom_line(data=data_x,
                                                  ggplot2::aes(x=y_grid, y=est, colour=Sname,
-                                                              linetype=Sname), size=lwd[i])
+                                                              linetype=Sname), linewidth=lwd[i])
     }
 
     ########################################
     # add points to the plot
     if (type[i]%in%c("points", "both") & !is.null(plotIndex)) {
       temp_plot = temp_plot + ggplot2::geom_point(data=data_x[plotIndex, ],
                                                   ggplot2::aes(x=y_grid, y=est, colour=Sname,
-                                                               shape=Sname), size=pwd[i])
+                                                               shape=Sname), linewidth=pwd[i])
     }
 
     if (type[i] == "line") {

diff --git a/R/lpcde/tests/testthat/test-lpcde.R b/R/lpcde/tests/testthat/test-lpcde.R
@@ -1,7 +1,3 @@
-test_that("error checking", {
-
-})
-
 test_that("lpcde default output", {
   set.seed(42)
   n=100