Question

我有一个亮点：

BusinessDate<-c("01-01-2014","01-02-2014","01-03-2014","01-04-2014","01-05-2014")
Corn<-c(1000000000,2,3,.0000000005,4)
Wheat<-c(2000000,1,8,10,.111111115)
risk<- data.frame(BusinessDate, Corn, Wheat)
sparklines(risk[,c("Corn", "Wheat")], 
       times=as.numeric(risk$BusinessDate),
       ptopts=('min.max'),  buffer= unit(1,'lines'),
       outer.margin=unit(c(4,12,4,15),'lines'))

我对运行上述代码时会看到的情节有几个问题：

（1）如何将y轴从科学记数法改为非科学记数法？

（2）如何将最大值的颜色更改为绿色而不是红色，以使最小值为红色，但最大值为绿色？

（3）如何更改ptopts的数据标签以非科学记数法显示。您将看到底部图表的数据标签为2e +06。我可以把它读成2000000吗？

（4）是否可以为大于时间序列的1个标准差的点着色。我认为这与ptopts有关。但它有可能......如此？

我知道这是很多问题。谢谢!!

Answer 1

要获得您要求的所有内容，您需要破解sparkline的代码...与sparklines的功能不同，而是帮助函数。它具有标签的硬编码格式规范。我能告诉你这些要点的颜色：

sparklines(risk[,c("Corn", "Wheat")], 
       times=as.numeric(risk$BusinessDate),
       ptopts=list(labels='min.max', gp=gpar(col=c("red", "green") )),  buffer= unit(1,'lines'),
       outer.margin=unit(c(4,12,4,15),'lines'))

查看两个函数的代码（通过键入其名称并查看格式化是在网格图形框架中进行的：

 libary(YaleToolkit)
 sparklines
 sparkline

我可以更改标签，但我还没有弄清楚如何通过向ptopts列表提供labels.ch参数来将它们按顺序正确分配给两个不同的点集。

R YaleToolkit更改ptopts max和min以及轴编号格式的颜色

1 个答案: