bodyfat {mpae}

Body fat data

Description

Modification of the dataset analysed in Penrose et al. (1985). Lists estimates of the percentage of body fat determined by underwater weighing and various body measurements for 246 men.

Usage

bodyfat

Format

A data frame with 246 rows and 14 columns:

bodyfat

Percent body fat (from Siri's 1956 equation)

age

Age (years)

weight

Weight (kg)

height

Height (cm)

neck

Neck circumference (cm)

chest

Chest circumference (cm)

abdomen

Abdomen circumference (cm)

hip

Hip circumference (cm)

thigh

Thigh circumference (cm)

knee

Knee circumference (cm)

ankle

Ankle circumference (cm)

biceps

Biceps (extended) circumference (cm)

forearm

Forearm circumference (cm)

wrist

Wrist circumference (cm)

Details

This data set can be used to illustrate multiple regression techniques (e.g. Johnson 1996). Instead of estimating body fat percentage from body density, which is not easy to measure, it is desirable to have a simpler method that allow this to be done from body measurements.

bodyfat.raw contains the original data. According to Johnson (1996), there were data entry errors (cases 42, 48, 76, 96 and 182 of the original data) and he suggested some rules to correct them. These outliers were removed in the bodyfat dataset, as well as an influential observation (case 39, which has a big effect on regression estimates). Additionally, the variable density was dropped for convenience, and variables height and weight were transformed into metric units (centimetres and kilograms) for consistency.

See bodyfat.raw for more details.

Source

StatLib Datasets Archive: https://lib.stat.cmu.edu/datasets/bodyfat.

References

Johnson, R. W. (1996). Fitting Percentage of Body Fat to Simple Body Measurements. Journal of Statistics Education, 4(1). doi:10.1080/10691898.1996.11910505.

Penrose, K., Nelson, A. and Fisher, A. (1985). Generalized Body Composition Prediction Equation for Men Using Simple Measurement Techniques. Medicine and Science in Sports and Exercise, 17(2), 189. doi:10.1249/00005768-198504000-00037.

See Also

bodyfat.raw, bfan

Examples

fit <- lm(bodyfat ~ abdomen, bodyfat)
summary(fit)
plot(bodyfat ~ abdomen, bodyfat)
abline(fit)