Last chance! 50% off unlimited learning
Sale ends in
Data for Exercises 1.14 and 1.47
Diplomat
A data frame with 10 observations on the following 4 variables.
Country
a factor with levels Brazil
Bulgaria
Egypt
Indonesia
Israel
Nigeria
Russia
S. Korea
Ukraine
Venezuela
Number
a numeric vector
rate
a numeric vector
Code
a factor with levels Br
Bu
Eg
In
Is
Ni
Ru
SK
Uk
Ve
# NOT RUN {
str(Diplomat)
attach(Diplomat)
par(mfrow=c(1,2))
names(Number) <- Country
dotchart(Number,main="Number of Tickets",col="blue",pch=1)
names(rate) <- Country
dotchart(rate,main="Tickets/Vehicle/Month",col="red",pch=2)
barplot(rate,col="pink")
detach(Diplomat)
# }
Run the code above in your browser using DataLab