a<-1
a

b<-2
b

c<-3
c

d<-3.5
d

a+b+c

var1<-c(1,2,3,4,5,6)
var2<-c(1:4)
var3<-seq(1,5)

var1
var2
var3
var4<-seq(1,10, by=2)
var5<-seq(1,10, by=3)
var1+2

str1<-"a"
str2<-"text"
str3<-"Hello World"
str4<-c("a","b","c")
str5<-c("Hello","World","is","good")

x<-c(1,2,3)
mean(x)

max(x)

min(x)

str5

paste(str5, collapse=" ")

x_mean <- mean(x)

str5_paste<-paste(str5,collapse=",")

install.packages("ggplot2")

library(ggplot2)

qplot(x)

x<-c("a","a","b","c")

qplot(data = mpg, x = hWy)
head(mpg)

qplot(data=mpg,x=cty)

qplot(data=mpg,x=drv, y=hwy)

qplot(data=mpg,x=drv, y=hwy, geom="line")

qplot(data=mpg, x=drv, y=hwy, geom="boxplot")
