5+4
5*7
#about packages
#install.packages("dplyr")
library(dplyr) 

numeric<-1
character<-"mark"
logical<-TRUE

numeric
character
logical

class(numeric)
class(character)
class(logical)

y<-25
y
y<-100
y

z <- 5 
w <- z+2 
w

w <- a+2 

w
W

x<-45

vector<-c(4, 5, 6, 12, 11, 5, 6, 3)
class (vector)

vector<-c("4", 5, 6, 12, 11, 5, 6, 3)
class (vector)

vector<-c("hi", 5, 6, 12, 11, 5, 6, 3)
class (vector)

u<- c(4, 6, NA, 2) 
u
k <- c(TRUE, FALSE, FALSE, NA, TRUE)
k
u[2]
k[4] <- TRUE 
k
k[c(2,3)]

v<-c(45, 243, 78, 343, 445, 44, 56, 77)
v<- c(v[5], v[7])

#TASKS I
num<-c(1,2,3,4,5,6,7,8,9,10)
class(num)
char<-c("Spain", "Germany", "USA", "UK", "France")
class(char)
log<- c(TRUE, FALSE, TRUE, NA, FALSE)
class(log)
log[4]<-TRUE
num[2]<-"number"
class(num)
char_2<-c(char[1], char[5])
char_2<-char[c(1,5)]