如何修改FittedModel数据输出包内的某一个数据

我只能想到直接改这一个办法：
model = LinearModelFit[{{1, 2}, {3, 4}, {5, 7}}, x, x]
model[[1, 2, 2]] = 1.3;
model
顺便，这个方法在未来搞不好会失效。（现在 Mathematica 明显有把各类“对象”都变为原子表达式的趋势。）
不过，为什么会有这种奇怪的需求？