情節預測區間在積分

Question

說，我有這樣的數據：

pred = rnorm(100, 0.1*(1:100), 1) 
interval_lower = pred - 1 
interval_upper = pred + 1 
sample_data <- data.frame(

    actual = rnorm(100, 0.1*(1:100), 2), 
    pred = pred, 
    interval_lower = interval_lower, 
    interval_upper = interval_upper) 

我怎麼會產生與預測區間的曲線繪製在預測和實際的數據，其中的預測是在紅色？

甚至不能加分的情節：

ggplot(data = sample_data) + geom_point(aes(x = 1:100, y = actual)) + 
    + geom_point(data = pred, colour = "red") 

Answer 1

我不是100％肯定你是問什麼，但試試這個：

ggplot(data = sample_data, aes(x=1:100)) + 
    geom_point(aes(y = actual)) + 
    geom_errorbar(aes(ymin = interval_lower, ymax = interval_upper), colour = "red") + 
    geom_point(aes(y=pred), colour='red') 

在你的代碼，第二個電話到geom_point()是沒有意義的，因爲你告訴它源數據幀是pred，它不是數據幀。它實際上只是圖的主數據框中的一個字段，sample_data，您已經定義並已告知ggplot。

移動aes(x=1:100)部分的ggplot()通話的內部，而不是在所有的geom_point()和geom_errorbar()電話只是保存鍵入的有它的。