Backbone events 我想要一个平均值和SD类似的线图

Backbone events 我想要一个平均值和SD类似的线图,backbone-events,Backbone Events,我想要和图片一样的图形,但不知道怎么做。事实上,同一天有不同的数据,我怎么做它的一行 library(tidyverse) library(data.table) fish <- read_csv(file = "FishF.csv", col_types = cols(DD= col_factor())) fish1<-fish[is.na(fish)] <- 0 fish View(fish) fd<-fish[,c(1,2,3)] 1 newfish <- m

我想要和图片一样的图形,但不知道怎么做。事实上,同一天有不同的数据,我怎么做它的一行

library(tidyverse)
library(data.table)
fish <- read_csv(file = "FishF.csv", col_types = cols(DD= col_factor()))
fish1<-fish[is.na(fish)] <- 0
fish
View(fish)
fd<-fish[,c(1,2,3)]
1
newfish <- melt(setDT(fish), id.vars = "DD", 
                measure.vars = patterns("avg","SE"),
                value.name = c("avg","SE"))[ , variable := lvls_revalue(variable, c("C3", "IgM", "IgT", "KHV", "Lyso"))][]
n<-  melt(setDT(fd), id.vars = "DD", 
          measure.vars = patterns("avg","SE"),
          value.name = c("avg","SE"))[ , variable := lvls_revalue(variable, c("C3"))][]
库(tidyverse)
库(数据表)
鱼