Skip to contents

Classifica o estado nutricional da pessoa segundo valores do Índice de Massa Corporal (IMC), usando os pontos de corte propostos pela Organização Mundial da Saúde. Pode ser informado um vetor com valores do IMC ou um vetor com o peso (Kg) e outro com a altura (m\(^2\)).

Usage

enutri(
  data,
  peso = "peso",
  altura = "altura",
  imc = NULL,
  cortes = "MS",
  idoso = FALSE,
  idade = NULL
)

Arguments

data

Banco de dados com a(s) variável(is). Argumento opcional.

peso

Peso em Kg. Argumento obrigatório se não for informado o argumento imc.

altura

Altura em metros (m). Argumento obrigatório se não for informado o argumento imc.

imc

Índice de Massa Corporal. Argumento obrigatório se não forem informados os argumentos peso e altura.

cortes

Categorias (pontos de corte) do estado nutricional.

  • "MS" (padrão) utiliza as definidas pelo Ministério da Saúde brasileiro (Abaixo do peso, Eutrófico, Sobrepeso, Obesidade grau I, Obesidade grau II e Obesidade grau III);

  • "OMS" utiliza as definidas pela Organização mundial da Saúde (Magreza, Baixo peso, Eutrófico, Sobrepeso e Obesidade);

  • "3cat" agrupa o peso baixo e o eutrófico em peso normal e identifica o sobrepeso e obesidade.

idoso

Argumento lógico. Adaptar a definição de eutrofia para idoso? O padrão é FALSE;

idade

Argumento opcional. Permite a classificação de adultos e idosos com a definição de eutrofia e sobrepeso específica para cada faixa etária, num banco de dados com a variável idade. Indicar entre aspas o nome da variável. Se definido, o argumento idoso é considerado TRUE.

Value

Um fator com a classificação do IMC segundo as categorias definidas.

References

Examples

data("hasdm") 
enutri(hasdm) |> 
  tabuleiro()
#>                Freq     % Freq.acum %acum
#> Abaixo do peso    4   1.0         4   1.0
#> Eutrófico       116  30.4       120  31.4
#> Sobrepeso       154  40.3       274  71.7
#> Obesidade I      74  19.4       348  91.1
#> Obesidade II     16   4.2       364  95.3
#> Obesidade III    18   4.7       382 100.0
#> Total           382 100.0       382 100.0
enutri(hasdm, cortes = "OMS") |> 
  tabuleiro()
#>            Freq     % Freq.acum %acum
#> Magreza       1   0.3         1   0.3
#> Baixo peso    3   0.8         4   1.0
#> Eutrófico   116  30.4       120  31.4
#> Sobrepeso   154  40.3       274  71.7
#> Obesidade   108  28.3       382 100.0
#> Total       382 100.0       382 100.0
  
# Se a população fosse toda idosa, poderíamos usar o argumento 'idoso = TRUE' 
# para uma classificação mais acurada.
 hasdm |> 
   enutri(idoso = TRUE) |> 
   tabuleiro()
#>                Freq     % Freq.acum %acum
#> Abaixo do peso   27   7.1        27   7.1
#> Eutrófico       159  41.6       186  48.7
#> Sobrepeso        88  23.0       274  71.7
#> Obesidade I      74  19.4       348  91.1
#> Obesidade II     16   4.2       364  95.3
#> Obesidade III    18   4.7       382 100.0
#> Total           382 100.0       382 100.0
   
# Entretanto, a mediana de idade da população está em 64 anos. Melhor usar o 
# argumento 'idade' para ajustar a classificação de acordo com o grupo etário.
hasdm |> 
  enutri(idade = "idade") |> 
  tabuleiro()
#>                Freq     % Freq.acum %acum
#> Abaixo do peso   23   6.0        23   6.0
#> Eutrófico       143  37.4       166  43.5
#> Sobrepeso       108  28.3       274  71.7
#> Obesidade I      74  19.4       348  91.1
#> Obesidade II     16   4.2       364  95.3
#> Obesidade III    18   4.7       382 100.0
#> Total           382 100.0       382 100.0

# Se a variável no banco tiver outro nome, digite-o entre aspas: 
names(hasdm)[3:5] <- c("age", "weight", "height")
hasdm |> 
  enutri('weight', 'height', idade = 'age') |> 
  tabuleiro()
#>                Freq     % Freq.acum %acum
#> Abaixo do peso   23   6.0        23   6.0
#> Eutrófico       143  37.4       166  43.5
#> Sobrepeso       108  28.3       274  71.7
#> Obesidade I      74  19.4       348  91.1
#> Obesidade II     16   4.2       364  95.3
#> Obesidade III    18   4.7       382 100.0
#> Total           382 100.0       382 100.0