![]()  | 
	
 | 
	
| 
			
			 | 
		#561 | |
| 
            
			 Advanced Member 
			
			
			
				
			
			Регистрация: 17.10.2012 
				Адрес: в Москве 
				
				
					Сообщений: 262
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 Цитата: 
	
 Нужно изучить этот метод Дюкана. Стоящая вещь. Но уже не сегодня. И так вместо тренировки у компа весь вечер просидел. p.s. вообще-то странно, что никто не уделил должного внимания данным Хога. В сущности это как раз то место, где можно строить настоящий научный диспут,а не болтовню на ровном месте вроде классических холиваров, набивших оскомину.  | 
|
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| Реклама | |
| 
 | |
| 
			
			 | 
		#562 | 
| 
            
			 Gold Member 
			
			
			
			Регистрация: 22.11.2011 
				
				
				
					Сообщений: 1,651
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 
			
			Parn, а какая такая научная задача связана с измерением собственного веса?  
		
		
		
		
		
		
	![]() Добавлено через 2 минуты А всякие измерения веса и высчитывание количества и состава съеденного считаю делом нездоровым. Надо жрать, что нравится, делать, что хочется, не делая гадостей другим - это и есть самый правильный и здоровый образ жизни.  | 
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#563 | |
| 
            
			 Platinum Member 
			
			
			
				
			
			Регистрация: 22.07.2010 
				Адрес: Санкт-Петербург 
				
				
					Сообщений: 3,304
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 Цитата: 
	
 Очередной безумный код на R 
                
                Код: 
	> NewD<-data.frame(idx=1:150)
> NewD$dd<-diff(MyW$trend)
> head(NewD)
  idx       dd
1   1 -0.26625
2   2 -0.27074
3   3 -0.39444
4   4 -0.40849
5   5 -0.54048
6   6 -0.42860
> summary(lm2<-lm(dd~poly(idx,2),data=NewD))
Call:
lm(formula = dd ~ poly(idx, 2), data = NewD)
Residuals:
     Min       1Q   Median       3Q      Max 
-0.40364 -0.06568 -0.00043  0.07016  0.41622 
Coefficients:
               Estimate Std. Error t value Pr(>|t|)    
(Intercept)   -0.217006   0.009486 -22.875  < 2e-16 ***
poly(idx, 2)1  0.545405   0.116185   4.694 6.08e-06 ***
poly(idx, 2)2 -0.324738   0.116185  -2.795  0.00588 ** 
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 
Residual standard error: 0.1162 on 147 degrees of freedom
Multiple R-squared: 0.1688,	Adjusted R-squared: 0.1575 
F-statistic: 14.92 on 2 and 147 DF,  p-value: 1.256e-06 
> plot(dd~idx,data=NewD,xlab="День",ylab="Изменение в весе, кг",main="Динамика потери веса",cex=0.8)
> grid()
> lines(fitted(lm2),col="red",lwd=2)
Может несколько смутить загиб параболы вниз справа, однако, фактически со 110 дня мы имеем чистый шум. Тренда уже нет, на что указывает рассчет F-статистики для данного диапазона. Еще какой-то код 
                
                Код: 
	> summary(lm2<-lm(dd~poly(idx,3),data=NewD[110:150,]))
Call:
lm(formula = dd ~ poly(idx, 3), data = NewD[110:150, ])
Residuals:
     Min       1Q   Median       3Q      Max 
-0.23608 -0.05608 -0.01039  0.08329  0.17194 
Coefficients:
              Estimate Std. Error t value Pr(>|t|)    
(Intercept)   -0.17964    0.01648 -10.901 4.14e-13 ***
poly(idx, 3)1  0.08390    0.10551   0.795    0.432    
poly(idx, 3)2 -0.14946    0.10551  -1.417    0.165    
poly(idx, 3)3  0.24645    0.10551   2.336    0.025 *  
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 
Residual standard error: 0.1055 on 37 degrees of freedom
Multiple R-squared: 0.1795,	Adjusted R-squared: 0.113 
F-statistic: 2.698 on 3 and 37 DF,  p-value: 0.05976 
> library(fitdistrplus)
> fitdist(NewD[110:150,2],"norm")
Fitting of the distribution ' norm ' by maximum likelihood 
Parameters:
       estimate Std. Error
mean -0.1796403 0.01728174
sd    0.1106571 0.01221554
> ks.test(NewD[110:150,2],"pnorm",-0.1796403,0.1106571)
	One-sample Kolmogorov-Smirnov test
data:  NewD[110:150, 2] 
D = 0.1067, p-value = 0.6989
alternative hypothesis: two-sided
Т.е. последние дни имеем нормально распределенный шум с матожиданием -180 грамм и стандартным отклонением 17 грамм. Переводя это в калории имеем недобор в 1620 ккал в день  | 
|
| 
        
        
             --------- 
            DNF is not an option 
             | 
||
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#564 | |
| 
            
			 Advanced Member 
			
			
			
				
			
			Регистрация: 17.10.2012 
				Адрес: в Москве 
				
				
					Сообщений: 262
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 Цитата: 
	
 ![]() ![]() ![]() ![]() ![]() ![]() ![]() Наверное ты хотел спросить какая научная задача в похудании? Ничего, все ошибаются. Ты вообще в мире бываешь? Ну,в настоящем мире,а не в интернете? В курсе, что задача похудания реально важная,нужная и актуальная? Про ожирение и избыточный вес слыхал? Погугли немного - развиваться полезно. А вот когда станешь немного разбираться в теме, тогда оценишь результат Хога. У тебя есть какие-нибудь здравые идеи каким образом он заставил свой организм избавиться от этого веса? Избавиться от большого веса. Хорошая задача из биологии. Из хорошей, нужной и важной науки. Человек даже сырые данные для анализа выложил! В кои-то веки можно было предметно по обсуждать что-то реальное? Не решая адовых бесконечных задач типа дураков и дорог,а приземленное, наше,родное. Не ныть, не жаловаться, не обсуждать кому какие фильмы нравятся и кто не любит сериалы про суд. Не все эта тухлятина! Люди сидят и думают - что бы еще написать? Чтобы еще запостить? А тут интересная тема. Может в этом методе Дюкара есть ответ - как похудеть без стресса и хирурга? Ты вообще понимаешь что это такое - сбросить 35 кг?! Ты хоть когда-нибудь сбрасывал вес? Да и вообще задач в мире море, вот только ученые решают не их,а какую-то хрень на палочке разглядывают. Решение вопроса похудания ГОРАЗДО важнее, чем вся философская хрень, что плодится параноиками с корками.  | 
|
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#565 | 
| 
            
			 Gold Member 
			
			
			
			Регистрация: 22.11.2011 
				
				
				
					Сообщений: 1,651
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 
			
			Parn, уважаемый, а Вы меня видели? С чего Вы взяли, что мне нужно похудеть, а не наоборот - потолстеть?  
		
		
		
		
		
		
	 
		 | 
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#566 | |
| 
            
			 Platinum Member 
			
			
			
				
			
			Регистрация: 18.10.2008 
				Адрес: там, где кормят и любят 
				
				
					Сообщений: 7,639
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 Цитата: 
	
 воот... интересна именно динамика и ее причины))  | 
|
| 
        
        
             --------- 
            Есть разные виды лжи. Просто ложь, наглая ложь и официальные данные... 
            Карательная психиатрия еще в конце ХХ века предупреждала про галоперидол и патроны... Помогаю с управлением индивидуальными показателями Высокой Вузовской Отчетности: от рецензий и публикаций до ДПО (КПК и ПП).  | 
||
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#567 | 
| 
            
			 Advanced Member 
			
			
			
			Регистрация: 21.05.2011 
				
				
				
					Сообщений: 409
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 
			
			Само собой нет. Такого никогда не бывает (ну может быть липосакция - исключение).  
		
		
		
		
		
		
	И вода и мышцы и жир. На Дюкане тяжело спортом заниматься, слишком мало углеводов. Опять же осложнения - типа проблемы с почками. Я противник Дюкана. Как любой диеты, кроме ЗОЖ с дефицитом калорий.  | 
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#568 | 
| 
            
			 Platinum Member 
			
			
			
				
			
			Регистрация: 27.04.2009 
				
				
				
					Сообщений: 10,620
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 
			
			Hogfather, а химию разную Вы не пробовали?  
		
		
		
		
		
		
	от всяких дамский блокаторов калорий до кленбутерола?  | 
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#569 | 
| 
            
			 Platinum Member 
			
			
			
				
			
			Регистрация: 22.07.2010 
				Адрес: Санкт-Петербург 
				
				
					Сообщений: 3,304
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 | 
| 
        
        
             --------- 
            DNF is not an option 
             | 
|
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 | 
| 
			
			 | 
		#570 | |
| 
            
			 Platinum Member 
			
			
			
				
			
			Регистрация: 22.07.2010 
				Адрес: Санкт-Петербург 
				
				
					Сообщений: 3,304
				 
				
				
				
				
				 | 
	
	
	
		
		
			
			 Цитата: 
	
 Потеря веса -36,3 кг. В том числе: Первые 50 дней - 15 кг Вторые 50 дней - 10 кг Третьи 50 дней - 7 кг Четвертые 50 дней - 4 кг Подробного графика пока не будет: смартфон с дневником наблюдений за тушкой находится в ремонте.  | 
|
| 
        
        
             --------- 
            DNF is not an option 
             | 
||
| 
		 | 
	
	
	
		
		
		
		
			 
		
		
		
		
		
		
		
			
		
		
		
	 |