Te mando 3 variables asi me aseguras sobre cual de ellas queres que trabaje
library(survey)
##
## Attaching package: 'survey'
##
## The following object(s) are masked from 'package:graphics':
##
## dotchart
options(OutDec = ",")
library(car)
## Loading required package: MASS
## Loading required package: nnet
load("~/Dropbox/odontologia/maestria licet/octubre 2013/datos_licet_28102013.RData")
You can also embed plots, for example:
table(diseniopost1$variables$Erosinbord, useNA = c("always"))
##
## 0 1 <NA>
## 1089 47 18
table(diseniopost1$variables$Severas, useNA = c("always"))
##
## 0 1 2 3 4 <NA>
## 1089 23 16 2 6 18
table(diseniopost1$variables$bewes, useNA = c("always"))
##
## 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14
## 551 6 4 2 11 7 8 3 26 10 24 15 51 36 31
## 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
## 40 52 26 37 28 41 25 19 22 18 13 7 9 6 5
## 30 31 32 36 37 38 40 44 47 <NA>
## 5 2 6 2 1 2 1 1 1 0