R Notebook

plot(cars)

variable

seq1 = "ATGCATGC"
seq2 = "ATG"

Concatenation

merge_seq = paste(seq1, seq2, sep = "")
print(merge_seq)

[1] "ATGCATGCATG"

Substring

gene_segment = substr(seq1, 2, 5)
print(gene_segment)

[1] "TGCA"

Question 2

x = 9
y = 3
result_add = x + y
print(result_add)

[1] 12

result_substract = x - y
print(result_substract)

[1] 6

result_multiply = x*y
print(result_multiply)

[1] 27

result_divide = x/y
print(result_divide)

[1] 3

result_modulo = x%%y
print(result_modulo)

[1] 0

result_power = x^y
print(result_power)

[1] 729