Height in Finland: Difference between revisions
(Data uploaded using Opasnet Base Import) |
(growth curve code added) |
||
Line 2: | Line 2: | ||
[[Category:Population characteristics]] | [[Category:Population characteristics]] | ||
<rcode name="kk" label="Show growth curves" embed=1 graphics=1 variables=" | [http://en.opasnet.org/w/Height_in_Finland?kk[sex]=Girl&kk[name]=Jasmine&kk[dat]=c%28%271.10.1997%27,168,178,%271.10.1998%27,80,10,%271.10.2010%27,140,50%29 Example URL for using the growth curve tool] | ||
<rcode name="kk" label="Show growth curves" embed=1 graphics=1 recall_inputs=1 variables=" | |||
name:sex|type:text| | name:sex|type:text| | ||
name:name|type:text| | name:name|type:text| | ||
Line 31: | Line 33: | ||
stat <- opbase.data("Op_en3074", subset = "Heights and weights") | stat <- opbase.data("Op_en3074", subset = "Heights and weights") | ||
stat$Mean <- as.numeric(as.character(stat$Mean)) | |||
stat$Age <- as.numeric(as.character(stat$Age)) | |||
stat$Sex <- gsub("Girls", "Girl", stat$Sex) | |||
stat$Sex <- gsub("Boys", "Boy", stat$Sex) | |||
d$Date <- as.POSIXct(strptime(d$Date, format = "%d.%m.%Y")) - as.POSIXct(strptime(birthdate, format = "%d.%m.%Y")) | d$Date <- as.POSIXct(strptime(d$Date, format = "%d.%m.%Y")) - as.POSIXct(strptime(birthdate, format = "%d.%m.%Y")) | ||
d$Date <- as.numeric(d$Date) / 365.25 | d$Date <- as.numeric(d$Date) / 365.25 | ||
ggplot(subset(stat, | ggplot(subset(stat, Measure == "Height" & Sex == sex), aes(x = Age, y = Mean)) + geom_line() + | ||
geom_point(data = d, aes(x = Date, y = Height)) | geom_point(data = d, aes(x = Date, y = Height)) + | ||
theme_gray(base_size = 24) | |||
</rcode> | </rcode> | ||
Line 127: | Line 134: | ||
==References== | ==References== | ||
<references/><!-- __OBI_TS: | <references/><!-- __OBI_TS:1442994338 --> |
Revision as of 08:39, 23 September 2015
Moderator:Jouni (see all) |
|
Upload data
|
[sex=Girl&kk[name]=Jasmine&kk[dat]=c%28%271.10.1997%27,168,178,%271.10.1998%27,80,10,%271.10.2010%27,140,50%29 Example URL for using the growth curve tool]
Question
What are the heights (and weights) in subgroups of Finnish population?
Rationale
Data
The most comprehensive information on heights of Finnish children are gender specific growth curves. They were previously used to extract the mean and 95% confidence interval (CI) of height at each age (month or year) from 0 to 18 years. See results of variable Height of 0-18 year old Finnish children. Based on this information probability distributions of heights of children aged 0-2 years and 2-18 years were constructed. Heights of males and females are studied separately. It was assumed that the height for each 1-month or 1-year age specific interval follows a normal distribution with mean being the mean reported in growth tables and standard deviation (SD) being the higher value of SDs calculated from the bounds of the 95% CI. 2500 values of heights for each 1-month and 1-year age interval were simulated from respective normal distributions and then grouped to match groups 0-2 years (months from 0 to 24) and 2-18 years (years from 2 to 18). Since none of parametric distributions fits the resulting data sets the empirical distribution of heights was constructed. Moreover, based on simulated data Spearman's rank correlation between age and height in each age/gender group was calculated.
Results of one simulation. For each age/gender group mean height, standard deviation (sd) and five percentiles (5th, 25th, 50th, 75th, 95th) are provided.
0-2 years males | 0-2 years females | 2-18 years males | 2-18 years females | |
mean | 73.4702 | 72.5382 | 133.7701 | 131.3875 |
sd | 10.1565 | 10.082 | 26.7919 | 25.8096 |
p5 | 53.5802 | 53.6169 | 89.6924 | 87.2984 |
p25 | 66.9607 | 65.5615 | 112.7309 | 110.5635 |
p50 | 75.4076 | 73.968 | 134.202 | 132.3863 |
p75 | 81.2614 | 80.4295 | 155.0239 | 155.0243 |
p95 | 87.1823 | 86.706 | 176.0145 | 176.7712 |
Spearman's rank correlation per age and gender:
0-2 years males | 0-2 years females | 2-18 years males | 2-18 years females | |
Spearman's rank correlation | 0.944 | 0.948 | 0.976 | 0.968 |