Anthropometric measurements are randomly generated using normal approximation. The default mean and standard deviation values used are based on US National Health Statistics for adults aged 20 years or over. The measurements are generated in same units as provided to the function.

h_anthropometrics_by_sex(
  df,
  seed = 1,
  id_var = "USUBJID",
  sex_var = "SEX",
  sex_var_level_male = "M",
  male_weight_in_kg = list(mean = 90.6, sd = 44.9),
  female_weight_in_kg = list(mean = 77.5, sd = 46.2),
  male_height_in_m = list(mean = 1.75, sd = 0.14),
  female_height_in_m = list(mean = 1.61, sd = 0.24)
)

Arguments

df

(data frame)
analysis dataset.

seed

Seed for random number generation.

id_var

(string)
patient identifier variable name.

sex_var

(string)
name of variable representing sex of patient.

sex_var_level_male

(string)
level of `sex_var` representing males.

male_weight_in_kg

(named list)
list of mean and sd of male weight in kilograms.

female_weight_in_kg

(named list)
list of mean and sd of female weight in kilograms.

male_height_in_m

(named list)
list of mean and sd of male height in metres.

female_height_in_m

(named list)
list of mean and sd of female height in metres.

Value

a dataframe with anthropometric measurements for each subject in analysis dataset.

Details

One record per subject.

Examples

library(random.cdisc.data)

ADSL <- radsl(N = 5, seed = 1)
df_with_measurements <- random.cdisc.data:::h_anthropometrics_by_sex(df = ADSL)
df_with_measurements
#> # A tibble: 5 × 5
#>   USUBJID             SEX   WEIGHT HEIGHT   BMI
#>   <chr>               <fct>  <dbl>  <dbl> <dbl>
#> 1 AB12345-CHN-17-id-2 F       39.6   1.60  15.5
#> 2 AB12345-CHN-16-id-1 M       98.8   1.80  30.4
#> 3 AB12345-RUS-14-id-4 M       53.1   1.66  19.2
#> 4 AB12345-CHN-11-id-5 M      162.    1.44  78.2
#> 5 AB12345-USA-14-id-3 M      105.    1.91  29.0