# Define 5 objects of your own liking (including object with more than one element)

letters.obj <- c("a","b","c")

logic.obj <- TRUE

numbers.obj <- c(1,2,3,4.5)

txt.snippet <- "Lorem ipsum dolor sit amet."

num.with.nas <- c(1,2,3,NA,NA,5,6)

# Get a class of following items: 5, "5", NA, TRUE, "true", NULL

class(5)

class("5")

class(NA)

class(TRUE)

class("true")

class(NULL)

# Calculate the equation - alternative 1 (least transparent)

eq <- ((5.5 * 4) + (7.5 * 2.12)) / (12 / 7)

eq

# Calculate the equation - alternative 2 (more transparent)

numerator <- (5.5 * 4) + (7.5 * 2.12)

denominator <- 12 / 7

eq <- numerator / denominator

eq

# Calculate the equation - alternative 3 (most transparent)

expr1 <- 5.5 * 4

expr2 <- 7.5 * 2.12

numerator <- expr1  + expr2

denominator <- 12 / 7

eq <- numerator / denominator

eq


# Get a square root of number 254

sqrt(254)

sq254 <- sqrt(254)