我用投资来获取年初至今的“IXIC”数据,然后我做了这些步骤
nasdaq.comp<-read.csv("C:\\Users\\Burkay.Duran\\Desktop\\nasdaq.csv")
nasdaq.comp<-nasdaq.comp%>%
rename(
Date = ï..Date )
nasdaq.comp[,1] <- anydate(nasdaq.comp[,1])
那是为了清除数据和更正时间,因为时间就像“19 年 4 月 5 日”
ggplot(nasdaq.comp, aes(x =Date, y = nasdaq.comp[,6])) +
geom_line(color = "darkblue") + ggtitle("Nasdaq Component prices series") +
xlab("Date") + ylab("Price") +theme(plot.title = element_text(hjust = 1.8))+
scale_x_date(date_labels = "%b %y")
之后我的图表看起来像这样
我该如何更正图表,那样看起来很奇怪。
预先感谢您的帮助。
您的数据在列中包含数百万和数十亿(例如“1234.56 B”),因此read.csv()
将其作为字符引入。为了解决这个问题,我想带出的字符stringr::str_remove_all()
中tidyverse
。您还可以使用gsub()
或 各种其他功能。
正则表达式"\\s\\w"
将删除一个空格后跟一个字母。
nasdaq.comp[,6] <-
str_remove_all(nasdaq.comp[,6], "\\s\\w") %>%
as.numeric()
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句