當我嘗試添加“scale_shape_manual”時，它顯示錯誤“所有未命名的引數必須長度為1”-有解無憂

我正在嘗試繪制折線圖，??但是當我嘗試添加“scale_shape_manual”時，它會顯示錯誤“所有未命名的引數必須長度為 1”。

這是我的原始資料：

Tiguan<-structure(list(GDD = c(487.95, 487.95, 487.95, 487.95, 487.95, 
487.95, 487.95, 487.95, 698.5, 698.5, 698.5, 698.5, 698.5, 698.5, 
698.5, 698.5, 900.25, 900.25, 900.25, 900.25, 900.25, 900.25, 
900.25, 900.25), Variété = c("Tiguan", "Tiguan", "Tiguan", 
"Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", 
"Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", 
"Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan", "Tiguan"
), Treatment = c("IRR- & N-  113", "IRR- & N   123", "IRR  & N-  139", 
"IRR  & N   147", "IRR- & N-  211", "IRR- & N   223", "IRR  & N-  237", 
"IRR  & N   247", "IRR- & N-  113", "IRR- & N   123", "IRR  & N-  139", 
"IRR  & N   147", "IRR- & N-  211", "IRR- & N   223", "IRR  & N-  237", 
"IRR  & N   247", "IRR- & N-  113", "IRR- & N   123", "IRR  & N-  139", 
"IRR  & N   147", "IRR- & N-  211", "IRR- & N   223", "IRR  & N-  237", 
"IRR  & N   247"), Indice_foliaire_LAI = c(0.620739348837209, 
0.644567476923077, 0.88557975, 0.588256271186441, 0.835278337078652, 
0.854556, 1.53936294573643, 1.34369638554217, 1.10213335714286, 
0.943865953947369, 2.00982867850099, 1.20625386996904, 2.33443615062762, 
2.26587034439834, 2.58574120065789, 2.33340772118959, 1.7192244043956, 
1.33842068847352, 2.40247312056738, 2.07099759264126, 2.07436100271739, 
2.43362987573965, 2.81841503695882, 2.43609819310345)), class = c("tbl_df", 
"tbl", "data.frame"), row.names = c(NA, -24L))

這是我使用的代碼：

library(ggplot2)
library(readxl)
library(scales)
library(tidyverse)

ggplot(Tiguan,aes(GDD,Indice_foliaire_LAI,color=Treatment,shape=Treatment)) 
  geom_point(cex=2.5) 
  geom_smooth(aes(group = Treatment)) 
  scale_color_manual(values = c("#BC3C29FF","#BC3C29FF","#BC3C29FF", "#0072B5FF","#0072B5FF","#0072B5FF", "#E18727FF",  "#E18727FF",  "#E18727FF", "#20584EFF","#20584EFF","#20584EFF")) 
  scale_shape_manual(values = c("15","17","19", "15","17","19", "15","17","19", "15","17","19")) 
  labs(title="Tiguan MG-(0)000", x = "Degree Growing Days (°C)", y ="LAI") 
  theme_bw() 
  guides(color=guide_legend("Treatment",override.aes=list(fill=NA)),linetype=guide_legend("Treatment")) 
  theme(plot.title = element_text(hjust = 0, face="bold", size = 17,
                                  color = "Black"),
        panel.grid = element_line(color = "#B3B3B3",
                                  size = 0.75,
                                  linetype = 3),
        axis.text.x = element_text(angle = 90, hjust = 1),legend.position = "right")

然后就出現了：

Error: All unnamed arguments must be length 1

當我洗掉時， scale_shape_manual(values = c("15","17","19", "15","17","19", "15","17","19", "15","17","19")) 我得到了這個數字：當我嘗試添加“scale_shape_manual”時，它顯示錯誤“所有未命名的引數必須長度為 1”

但是您可以看到圖例中有兩種處理方法缺少形狀。歡迎任何建議！謝謝！

uj5u.com熱心網友回復：

從您的中洗掉引號values，即使用scale_shape_manual(values = c(15,17,19,15,17,19,15,17,19,15,17,19))

轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/532432.html

標籤：rggplot2折线图

上一篇：如何在R-igraph包下獲得清晰的圖形繪圖/縮放

下一篇：group_by之后的行之間的值差異