anova()是R的stats package的function。car package里的是Anova()。注意大小写

lm2=lm(log.price~as.factor(reason))
> library(car)
> Anova(lm2,type="III")
Error in gsub("+", "  + ", h, fixed = TRUE) :
  invalid multibyte string at '<8d> <3d> 0'
> lm2.1=lm(log.price~as.factor(reason)+as.factor(goods))
> Anova(lm2.1,type=("Ⅲ")
+ Anova(lm2.1,type=("Ⅲ")
Error: unexpected symbol in:
"Anova(lm2.1,type=("Ⅲ")
Anova"
还是运行不起来啊

Error: unexpected symbol in:
"Anova(lm2.1,type=("Ⅲ")

这个是因为括号问题。

第一段程序个人感觉是数据问题，我自己试了Anova()没发现问题，你方便把你数据的一部分sample发过来吗，这样我可以自己试一下