CASO 1: Vetor de dados

Os dados dizem respeito às resistências à compressão, em libras por polegada quadrada (psi), de 80 corpos de prova de uma nova liga de alumínio-lítio.

dados <- c(105, 221,    183,    186,    121,    181,    180,    143,
          97,     154,  153,    174,    120,    168,    167,    141,
          245,  228,    174,    199,    181,    158,    176,    110,
          163,  131,    154,    115,    160,    208,    158,    133,
          207,  180,    190,    193,    194,    133,    156,    123,
          134,  178,     76,    167,    184,    135,    229,    146,
          218,  157,    101,    171,    165,    172,    158,    169,
          199,  151,    142,    163,    145,    171,    148,    158,
          160,  175,    149,     87,    160,    237,    150,    135,
          196,  201,    200,    176,    150,    170,    118,    149)
dados
##  [1] 105 221 183 186 121 181 180 143  97 154 153 174 120 168 167 141 245 228 174
## [20] 199 181 158 176 110 163 131 154 115 160 208 158 133 207 180 190 193 194 133
## [39] 156 123 134 178  76 167 184 135 229 146 218 157 101 171 165 172 158 169 199
## [58] 151 142 163 145 171 148 158 160 175 149  87 160 237 150 135 196 201 200 176
## [77] 150 170 118 149

Vamos usar funções nativas do R para realizar a AED.

1.1 Ordenação dos dados

sort(dados) # a função `sort()` ordena os dados do menor para o maior
##  [1]  76  87  97 101 105 110 115 118 120 121 123 131 133 133 134 135 135 141 142
## [20] 143 145 146 148 149 149 150 150 151 153 154 154 156 157 158 158 158 158 160
## [39] 160 160 163 163 165 167 167 168 169 170 171 171 172 174 174 175 176 176 178
## [58] 180 180 181 181 183 184 186 190 193 194 196 199 199 200 201 207 208 218 221
## [77] 228 229 237 245

1.2 Valores expremos

max(dados)  # maior valor observado
## [1] 245
min(dados)  # menor valor observado
## [1] 76
max(dados) - min(dados)  # amplitude
## [1] 169

1.3 Amplitude de Dados[x(max) - x(min)]. Formas diferente de cálculo:

  • Usamos a função range, para identificar os valores extremos do vetor de dados
range(dados)
## [1]  76 245
  • usando as funções máximo max() e mínimo min() do R
max(dados) - min(dados) # amplitude
## [1] 169