Computation of the hipamAnthropom elements for a given number of sizes defined by the EN

Share:

Description

This is a helper function for computing the hipamAnthropom elements provided by the hipamAnthropom algorithm for a number of bust sizes defined by the European Normative (EN). Therefore, the hipamAnthropom is used inside this function.

Usage

1
2
computSizesHipamAnthropom(dataHip, bust, bustMeasur, nsizes, maxsplit, orness, 
                          type, ah, verbose = FALSE)

Arguments

dataHip

Data frame.

bust

Bust column of the data frame.

bustMeasur

Sequence vector of bust measurements (bust sizes) provided by the bustSizesStandard function.

nsizes

Number of sizes defined by the European Normative to apply the hipamAnthropom function.

maxsplit, orness, type, ah, verbose

Same arguments as those of the hipamAnthropom function.

Value

A list with the same elements as the hipamAnthropom function.

Author(s)

Guillermo Vinue

References

European Committee for Standardization. Size designation of clothes. Part 3: Measurements and intervals. (2005).

Vinue, G., Leon, T., Alemany, S., and Ayala, G., (2013). Looking for representative fit models for apparel sizing, Decision Support Systems 57, 22–33.

See Also

hipamAnthropom, bustSizesStandard

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
dataHipam <- sampleSpanishSurvey
bust <- dataHipam$bust
bustSizes <- bustSizesStandard(seq(74, 102, 4), seq(107, 131, 6))

type <- "IMO"
maxsplit <- 5 ; orness <- 0.7
ah <- c(23, 28, 20, 25, 25)

set.seed(2013)
numSizes <- 1
res_hipam <- computSizesHipamAnthropom(dataHipam, bust, bustSizes$bustCirc, numSizes,
                                       maxsplit, orness, type, ah, FALSE)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.