R中的'x'和'y'长度不同

Question

我试图在R中绘制一条水平线，但它给了我一个错误。

代码：

w <- seq(1, 99, by=1)
alpha <- 0.1
beta <- 0.001

U <- alpha*w -(beta/2)*w*w
Uprime <- alpha -(beta)*w
Udprime <- -beta
Utprime <- 0

plot(w,Udprime,type = "l",main = "Graph of U(W) versus wealth",xlab = "Wealth",ylab = "Utility Function")

当我绘制此函数时，我收到此错误：

Error in xy.coords(x, y, xlabel, ylabel, log) : 
  'x' and 'y' lengths differ

为什么会这样？需要一些指导。

Answer 1

要绘制财富效用函数的二阶导数的水平线，您需要确保Udprime为每个点w都有一个点。有两种方法可以做到这一点：

快捷方式：

plot(cbind(w, Udprime))

更多“真实的数学”：

Udprime = -beta * w^0