※ 引述《markbaseball (Mark)》之铭言：
:
: - 问题: 当你想要问问题时，请使用这个类别
:
: [问题类型]:
:
: 程式咨询(我想用R 做某件事情，但是我不知道要怎么用R 写出来)
:
: [软件熟悉度]:
: 请把以下不需要的部份删除
: 新手(没写过程式，R 是我的第一次)
: [问题叙述]:
: 请问各位在回归分析时，默认的Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
: 但是，我现在要检定的是系数是否异于1，不是0。请问有办法更改默认值吗?
: 谢谢各位的帮忙
: [程式范例]:
参考连结:
http://stackoverflow.com/questions/8089797/inference-about-slope-coefficient-in-r
library(car)
g <- lm(dist ~ speed, cars)
linearHypothesis(g, "speed = 4")
## 方法2
library(dplyr)
cars2 <- mutate(dist = dist - 4 * speed)
lm(dist ~ speed, cars2) %>% summary

andrew43 的文怎么没了 看起来没问题啊?囧\ 原来是改名了..

这方法比较方便，也不用输入自由度。