数据是日期与GDP现价累计同比（季度数据）
我想要用qqplot()画出来GDP现价走势 但是 出现了error
code如下：
data <- read.csv("data.csv",header = TRUE)
ggplot(data,aes(x=data$指标名称,y=data$GDP.现价.累计值.同比))+geom_line()
但是 出现了错误
geom_path: Each group consists of only one observation. Do you need to adjust the group aesthetic?
Warning messages:
1: In grepl("|||", what, fixed = TRUE) :
  input string 1 is invalid in this locale
2: In grepl("|||", what, fixed = TRUE) :
  input string 1 is invalid in this locale


图像生成为

然后我将命令改为
data <- read.csv("data.csv",header = TRUE)
date <- data[,1]
rownames(data)=as.character(data[,1])
data <- data[,-1]

data <- cbind(date,data)
ggplot(data,aes(x=data$date,y=data$GDP.现价.累计值.同比))+geom_line()

不出现warning message的信息了 但是 图像还是不出现 请问到底是为什么呀？
错误信息如下
geom_path: Each group consists of only one observation. Do you need to adjust the group aesthetic?
图像依旧长这样：

对于不出现warning message 我也有点困惑 不就是我先去掉了一行 然后又加上了吗。。。第一列就变得valid了 我也不是很明白为什么。。。
请教大神啊 这个qqplot 如何用？我要如何改 可以出图？
数据为：