replave argument 'size' with 'linewidth'

JDLeongomez · Jun 20, 2023 · ccbf948 · ccbf948
1 parent b7f2ad2
commit ccbf948
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/app.R b/app.R
@@ -176,7 +176,7 @@ server <- function(input, output) {
 
         #Plot 1: Citations per publication, h-index and g-index
         p1 <- ggplot(pubs, aes(x = rank, y = cites)) +
-          geom_abline(intercept = 0, slope = 1, color = input$accentCol, linetype = "dotted", size = 0.7) +
+          geom_abline(intercept = 0, slope = 1, color = input$accentCol, linetype = "dotted", linewidth = 0.7) +
           geom_line(aes(color = "Citations per publication")) +
           geom_line(aes(y = floor(sqrt(sums)), color = "Square root of cumulative\ncitations (rounded down)")) +
           scale_color_manual(values = colors) +