1

我有一个包含概率的时间序列。为简单起见,假设每个点都代表我对某一天纽约是否会下雨的估计。当我绘制时间序列时,如果我是正确的,我希望符号是 pch=1 和 col="green",如果我错了,我想使用 pch=4 和 col="red"。

我已经尝试过几种方法,但都失败了。主要是我在 PerformanceAnalytics 中使用 chart.TimeSeries 函数。我对想法持开放态度。

我尝试绘制一个系列,包括 pch 和 col 的向量来表示正确和不正确。我尝试仅绘制正确的点并使用点函数添加不正确的点。

谢谢。

4

1 回答 1

0

我会试着猜测你在问什么。首先为某个月份的每一天创建一组预测,并确定您的预测是否正确:

df <- data.frame(days = 1:31,
                 p_rain = runif(31),
                 correct = sample(c(TRUE,FALSE),31,T))

现在根据您是否正确创建符号和颜色:

df$ppch <- 1 # the default
df$ppch[df$correct==FALSE] <- 4 # when you were wrong

相似地,

df$pcolor <- as.character('green')
df$pcolor[df$correct==FALSE] <- 'red'

现在绘制:

with(df, plot(days,p_rain,pch=ppch,col=pcolor))

在此处输入图像描述

于 2014-04-29T01:57:00.483 回答