从脚本调用chart_Series仅显示空白图形设备的问题排查

我帮你排查了下，你遇到的空白图问题主要是数据读取环节出了问题，加上一些小细节没注意到，下面一步步给你修正：

首先，得确保你加载了必要的R包——chart_Series是quantmod包的函数，而xts和zoo是处理时间序列的基础包，先加载它们：

library(xts)
library(quantmod)

然后看你的Lines数据：你用空格分隔了每一行的观测，但read.csv2.zoo默认是把换行符当成行分隔符的，原始的空格会让所有数据被当成一行读入，生成的时间序列对象完全不对，自然画不出图。修正Lines的格式，把空格换成换行：

Lines <- "2018-01-02;2683.73;2695.89;2682.36;2695.81
2018-01-03;2697.85;2714.37;2697.77;2713.06
2018-01-04;2719.31;2729.29;2719.07;2723.99
2018-01-05;2731.33;2743.45;2727.92;2743.15
2018-01-08;2742.67;2748.51;2737.60;2747.71
2018-01-09;2751.15;2759.14;2747.86;2751.29"

接下来修正数据读取代码：你写的...是多余的（没有传入额外参数），直接删掉就行，确保read.csv2.zoo能正确解析每一行：

a <- as.xts(read.csv2.zoo(text = Lines, 
                          col.names = c("Date", "Open", "High", "Low", "Close"), 
                          header = FALSE, 
                          stringsAsFactors = FALSE))

最后调用chart_Series就可以正常画出K线图了：

chart_Series(a)

额外排查点 #

如果还是出空白图，可以检查：

• 确认你的绘图设备正常，比如在RStudio里切换到"Plots"面板，或者手动用dev.new()打开一个新的绘图设备再运行绘图命令
• 查看a的结构：用str(a)看看是不是生成了正确的xts对象，确认有5列OHLC数据和对应的日期索引

内容的提问来源于stack exchange，提问作者tom9