seq.int0，to0-from，by中的错误：“ to”必须是有限的数字按日期绘图

如何解决seq.int0，to0-from，by中的错误：“ to”必须是有限的数字按日期绘图

代码在这里：

brown<-melt(brown,id=c("date","variety","GDD"))

brown$variety <- as.factor(brown$variety) #set variety as a factor so you can manipulate the colors

brown_bloom<- brown[ which(brown$variable =='bloom'),]
B2<-ggplot(brown_bloom,aes(x=as.Date(date,"%m/%b"),y=as.numeric(value),color=variety))+
  geom_point() +
  geom_smooth(method="loess",formula = brown_bloom$value ~ brown_bloom$date,se=T)+
  ylim(0,100)+
  theme_classic()+
  scale_x_date(breaks = "4 days",minor_breaks = "1 day",labels=date_format("%m/%d")) +
  labs(x = "Date",y = " %Bloom",title = "W. ottawa")

继续获取错误：

seq.int（0，to0-from，by）中的错误：“ to”必须是有限数

此外：警告消息：

有什么提示吗？不知道这是什么意思。