如何在R中繪制概率密度函數？

Question

我試圖繪制一個x限制從-1到0，從0到1的概率密度函數，所以我要繪制兩個圖：

x1 = seq(-1, 0, 0.01)
x2 = seq(0, 1, 0.01)

eq1 = function(x) {(1+x)^2}
eq2 = function(x) {(1+x)^3}

plot(x1, eq1, col="red")
par(new = TRUE)
plot(x2, eq2, type = "l", col = "green")

但是，出現以下錯誤：

xy.coords（x，y，xlabel，ylabel，log）中的錯誤：'x'和'y'的長度不同。

我不確定發生了什么。

Answer 1

正如評論中指出的那樣， plot()的第二個參數（即y ）必須是向量：

x1 = seq(-1, 0, 0.01)
x2 = seq(0, 1, 0.01)

eq1 = function(x) {(1+x)^2}
eq2 = function(x) {(1+x)^3}

plot(x1, eq1(x1), col="red")
par(new = TRUE)
plot(x2, eq2(x2), type = "l", col = "green")