-------------------------------
#install.packages("ggplot2")
library(ggplot2)
?qplot
wbvlr<-read.csv("gd.csv")
head(wbvlr)
qplot(data=wbvlr,x=Internet.users)
qplot(data=wbvlr,x=Income.Group)
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate)
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate,size=115)
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate,size=I(.5))
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate,size=I(5),
color=I("Blue"))
qplot(data=wbvlr,x=Income.Group,y=Birth.rate,size=I(.9),
color="Y",geom = "boxplot")
head(wbvlr)
qplot(data=wbvlr,x=Internet.users,
y=Birth.rate)
qplot(data=wbvlr,x=Internet.users,
y=Birth.rate,color=I("red"),
size=4)
qplot(data=wbvlr,x=Internet.users,
y=Birth.rate,color=Income.Group,
size=I(4))
#install.packages("ggplot2")
library(ggplot2)
?qplot
wbvlr<-read.csv("gd.csv")
head(wbvlr)
qplot(data=wbvlr,x=Internet.users)
qplot(data=wbvlr,x=Income.Group)
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate)
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate,size=115)
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate,size=I(.5))
qplot(data=wbvlr,x=Income.Group,
y=Birth.rate,size=I(5),
color=I("Blue"))
qplot(data=wbvlr,x=Income.Group,y=Birth.rate,size=I(.9),
color="Y",geom = "boxplot")
head(wbvlr)
qplot(data=wbvlr,x=Internet.users,
y=Birth.rate)
qplot(data=wbvlr,x=Internet.users,
y=Birth.rate,color=I("red"),
size=4)
qplot(data=wbvlr,x=Internet.users,
y=Birth.rate,color=Income.Group,
size=I(4))