如何在R中更改为xts对象创建的绘图线条颜色?
要更改在R中为xts对象创建的绘图的线条颜色,我们可以按照以下步骤操作:
首先,创建一个数据框。
然后,将此数据框转换为xts对象。
使用默认颜色创建xts对象数据的绘图。
然后,使用不同的颜色创建xts对象数据的绘图。
创建数据框
让我们创建一个如下所示的数据框:
Dates<-seq.POSIXt(from=as.POSIXct("2021-01-01"),to=as.POSIXct("2021-01- 25"),length.out=25) Score<-sample(1:100,25) df<-data.frame(Dates,Score) df
执行上述脚本后,将生成以下输出(此输出由于随机化而会因您的系统而异):
Dates Score 1 2021-01-01 85 2 2021-01-02 60 3 2021-01-03 80 4 2021-01-04 95 5 2021-01-05 93 6 2021-01-06 43 7 2021-01-07 57 8 2021-01-08 27 9 2021-01-09 74 10 2021-01-10 84 11 2021-01-11 18 12 2021-01-12 16 13 2021-01-13 72 14 2021-01-14 100 15 2021-01-15 23 16 2021-01-16 50 17 2021-01-17 2 18 2021-01-18 31 19 2021-01-19 54 20 2021-01-20 73 21 2021-01-21 33 22 2021-01-22 17 23 2021-01-23 6 24 2021-01-24 12 25 2021-01-25 98
将数据框转换为xts对象
加载xts包并将df转换为xts对象:
Dates<-seq.POSIXt(from=as.POSIXct("2021-01-01"),to=as.POSIXct("2021-01- 25"),length.out=25) Score<-sample(1:100,25) df<-data.frame(Dates,Score) library(xts) df_ts<-xts(df$Score,df$Dates) df_ts
输出
[,1] 2021-01-01 85 2021-01-02 60 2021-01-03 80 2021-01-04 95 2021-01-05 93 2021-01-06 43 2021-01-07 57 2021-01-08 27 2021-01-09 74 2021-01-10 84 2021-01-11 18 2021-01-12 16 2021-01-13 72 2021-01-14 100 2021-01-15 23 2021-01-16 50 2021-01-17 2 2021-01-18 31 2021-01-19 54 2021-01-20 73 2021-01-21 33 2021-01-22 17 2021-01-23 6 2021-01-24 12 2021-01-25 98
创建xts对象的绘图
使用plot函数创建xts对象的绘图:
Dates<-seq.POSIXt(from=as.POSIXct("2021-01-01"),to=as.POSIXct("2021-01- 25"),length.out=25) Score<-sample(1:100,25) df<-data.frame(Dates,Score) library(xts) df_ts<-xts(df$Score,df$Dates) plot(df_ts)
输出
创建具有不同颜色线条的相同绘图
使用lines函数创建具有不同线条颜色的xts对象的绘图,如下所示:
Dates<-seq.POSIXt(from=as.POSIXct("2021-01-01"),to=as.POSIXct("2021-01- 25"),length.out=25) Score<-sample(1:100,25) df<-data.frame(Dates,Score) library(xts) df_ts<-xts(df$Score,df$Dates) plot(df_ts) lines(df_ts,col="red")
输出
广告