R - 测试假设参数等于某事

Question

我正在学习经济学，我们刚刚开始在RStudio学习R，我们做了功课，我真的很糟糕，我几乎完成了所有其他任务，但我不知道如何做到这一点（对不起，如果它很简单） 我们得到了一些数据，我们应该估计这个回归函数（相反，你应该有e）： Function

到目前为止，我有这个：

tabulka = read.table("data.txt", header = TRUE, sep= "")

regrese2 = lm(log(Output)~log(LPrice)+log(KPrice)+log(FPrice), data=tabulka)

summary(regrese2)

不确定是否正确，如果您发现错误请纠正我：）

但我真正需要帮助的是，如果β1 = 1以及β2 = β3 = 0，我们必须检验假设。有人能告诉我，我这样做吗？感谢您提前提供任何帮助

Answer 1

您可以使用library(car)

并使用 linearHypothesis 函数进行联合假设。

您的代码应如下所示：

linearHypothesis(regrese2, c(“LPrice = 0”))



linearHypothesis(regrese2, c(“KPrice = 0”,  “FPrice = 0”)) 

Answer 2

beta_2 = 0和beta_3 = 0的测试将由summary(regrese2)给出（请注意，这些测试以模型中的其他术语为条件）。

测试beta_1 = 1有3种方法（可能更多），你应该使用哪一种方法将由老师决定：

1. 运行摘要函数summary(regrese2)并使用第一个回归项的摘要中的效果大小和标准误差，并将这些数字插入到图书公式中并“手动”进行测试。这通常是教师希望学生在更基础的课程中做的事情。

2. 从log(LPrice)中减去log(Output)，然后将其用作响应变量，并测试log(LPrice)上的系数是否等于0.

3. 使用offset右侧的log(LPrice) + offset(log(LPrice))函数：~，然后再次针对0测试log(LPrice)的系数。