私は2つのシグマの線の上に2シグマの線をプロットすることができ、私は2シグマの線をプロットすることはできませんし、それらをdiffferently
20 1 15 19 23
19 2 14 20 66
18 3 13 3 34
17 4 12 4 12
16 5 11 5 45
15 6 10 6 19
14 7 20 7 27
13 8 19 8 15
12 9 18 8 19
11 10 17 9 43
10 11 16 10 23
9 12 15 11 31
8 13 1 12 41
7 14 14 13 24
6 15 13 14 29
5 16 12 15 16
4 17 11 16 52
3 18 10 17 12
2 19 9 20 15
1 20 8 19 31
そして2シグマレベルが
Sigma2 <- meanX + c(-2, +2) * sdX
最後に、それらをプロット
sdX <- sd(X)
標準偏差を計算し、そして、
say X <- c("your data")
meanX <- mean(X)
のデータの平均を取ります。 。
plot(X, typle = "l", main="", xlab="", ylab="",) # just add the levels as you want
abline(h=meanX, col="red", lwd=2)
abline(h=Sigma2, lwd=2, col="blue")
完了！
しかし、Sigma2の線の上と下でどのように異なる色をプロットすることができますか？ –
あなたはOPが望むものの最後の部分をやっていません（+/- 2シグマレッドを超える色の点）。 –
@Analytics_Lover、上記のコメントを参照してください... –
これまでに何を試しましたか？ '？mean'と'？sd'（2シグマ制限を見つける）と 'plot（...、col = ifelse（...、" black "、" red "））を組み合わせてソリューションをまとめることができます'... –
あなたがこれまでに試したことを示してください。 –
私は初心者で学習段階です。 SOは本当に私を多くの面で助けます。 –