R Notebook

Section 1

We are working witha car dataset

Subsection

plot(cars)
car_data = cars
print(car_data)
Summary(car_data)

print(cars)

print(cars)

Summary(cars)

Arithmatic operation

x = 10 y = 5

print(x+y) print(x-y) print(xy) print(x/y) print(x^y) print(2^3) print(x %% y) print(10 %% 3) print( ((x+y)5) - 20 )

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

gene_seq = "ATTTTGGGCCTTT"
gene_segment = substr(gene_seq, 4, 6)
print(gene_segment)

[1] "TTG"