R Notebook

QUESTION 1

gene1 = "ACCGTACC"
gene2 = "AGT"

Concatenation

combined = paste(gene1, gene2, sep = "")
combined

[1] "ACCGTACCAGT"

Substring

substr(gene1, start = 2, stop = 5)

[1] "CCGT"

Pattern exists?

grepl(gene2, gene1)

[1] FALSE

QUESTION 2

var1 = 15
var2 = 5

Add

result_add = var1 + var2
print(result_add)

[1] 20

Substract

result_sub = var1 - var2
result_sub

[1] 10

Multiply

result_mult = var1*var2
result_mult

[1] 75

Divide

result_div = var1/var2
result_div

[1] 3

Power

result_p1 = var1^3
result_p1

[1] 3375

result_p2= var2^3
result_p2

[1] 125

Modulo

result_m = var1 %% var2
result_m

[1] 0