R Programming: Como extraer los datos de una variable.

#Puedo extraer los valores de la columna "nitrate" con los brackets
> data[ ,"nitrate"]

  [1] 0.632 0.173 0.568 0.719 0.479 0.211 0.266 0.302 1.800 0.651 0.507 0.669 0.602 0.351
 [15] 0.295 1.200 1.160 1.200 0.553 0.993 0.404 0.226 0.559 0.363 0.474 0.531 0.221 0.429
 [29] 0.537 0.460 0.409 0.204 0.355 0.191 1.030 1.400 0.671 0.815 0.236 0.902 0.233 0.189
 [43] 0.149 0.657 0.428 0.554 0.520 0.186 0.576 0.372 0.223 0.466 0.372 0.590 0.219 0.739
 [57] 0.421 0.250 0.312 1.010 1.040 0.491 0.506 0.340 0.203 0.472 0.941 0.570 0.215 0.286
 [71] 0.290 0.209 0.188 0.342 1.100 0.964 0.715 0.486 0.193 0.378 0.285 0.276 0.326 1.480
 [85] 0.518 0.118 0.227 1.770 0.205 0.322 0.177 0.503 0.193 0.267 0.743 1.830 0.425 0.803
 [99] 0.979 0.479 0.665 0.337 1.610 0.331 0.178 0.283 1.610 0.400 1.080 0.140 0.222 0.299
[113] 0.382 0.363 0.446 0.577 1.140

#Y sacar el promedio de todas las filas, y la columna "nitrate"
> mean(data[ ,"nitrate"])
[1] 0.5481368

> #Pero hay otra manera mas sencilla. Si tengo las siguientes variables:

> names(data)
[1] "Date"    "sulfate" "nitrate" "ID"     
> 
> #Y necesito sacar la media de la variable "nitrate" puedo extraer los valores de esta variable con el signo de dollar $

> data$nitrate
  [1] 0.632 0.173 0.568 0.719 0.479 0.211 0.266 0.302 1.800 0.651 0.507 0.669 0.602 0.351
 [15] 0.295 1.200 1.160 1.200 0.553 0.993 0.404 0.226 0.559 0.363 0.474 0.531 0.221 0.429
 [29] 0.537 0.460 0.409 0.204 0.355 0.191 1.030 1.400 0.671 0.815 0.236 0.902 0.233 0.189
 [43] 0.149 0.657 0.428 0.554 0.520 0.186 0.576 0.372 0.223 0.466 0.372 0.590 0.219 0.739
 [57] 0.421 0.250 0.312 1.010 1.040 0.491 0.506 0.340 0.203 0.472 0.941 0.570 0.215 0.286
 [71] 0.290 0.209 0.188 0.342 1.100 0.964 0.715 0.486 0.193 0.378 0.285 0.276 0.326 1.480
 [85] 0.518 0.118 0.227 1.770 0.205 0.322 0.177 0.503 0.193 0.267 0.743 1.830 0.425 0.803
 [99] 0.979 0.479 0.665 0.337 1.610 0.331 0.178 0.283 1.610 0.400 1.080 0.140 0.222 0.299
[113] 0.382 0.363 0.446 0.577 1.140

> #Y con la funcion mean() saco el promedio:

> mean(data$nitrate)
[1] 0.5481368