# NOT RUN {
SetNames(1:5, names=letters[1:5])
# the default, if no argument names are provided, is "names"
SetNames(1:5, letters[1:5])
tab <- table(d.pizza$driver, d.pizza$wine_delivered)
# rownames and columnnames can be set at the same time
SetNames(BinomCI(tab[,1], rowSums(tab)),
rownames=rownames(tab), colnames=c("perc", "lci", "uci"))
# }
Run the code above in your browser using DataLab