150 дней издевательств над организмом по Дюкану. Анализы в норме, самочувствие в норме.
Минимальный достигнутый вес 99.9 кг (2 дня назад). На сегодня фактический вес -- 102.3. Экспоненциально сглаженный тренд -- 101.9.
Ну, и как обычно, мат.модель
Call:
lm(formula = MyW$V1 ~ poly(MyW$idx, 4))
Residuals:
Min 1Q Median 3Q Max
-3.0341 -0.5340 -0.0357 0.6207 3.3116
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 114.9053 0.0732 1569.638 < 2e-16 ***
poly(MyW$idx, 4)1 -106.6909 0.8996 -118.604 < 2e-16 ***
poly(MyW$idx, 4)2 7.6254 0.8996 8.477 2.32e-14 ***
poly(MyW$idx, 4)3 -4.9489 0.8996 -5.501 1.64e-07 ***
poly(MyW$idx, 4)4 2.3031 0.8996 2.560 0.0115 *
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 0.8996 on 146 degrees of freedom
Multiple R-squared: 0.9898, Adjusted R-squared: 0.9895
F-statistic: 3544 on 4 and 146 DF, p-value: < 2.2e-16