Week 2 - Lecture 2.2

Data

This is the code for Thursday

Telomeres are the “padding” on the end of chromosomes.

Cort is a hormone related stress.

# Telomere
## Control 
telo.control <- c(0.95, 0.96, 1.07, 1.08, 1.09, 
             1.1,  1.12, 1.14, 1.18, 1.19, 
             1.19, 1.2, 1.34, 1.45,  1.49, 
             1.55)


## experimental
telo.disturbed <- c(0.83, 0.84, 0.87, 0.93, 0.94, 
               0.96, 0.99, 1.00, 1.01, 1.01, 
               1.02, 1.05, 1.07, 1.08, 1.09,
               1.09, 1.12, 1.13, 1.16, 1.24, 
               1.41)
               
# CORT
## control
cort.control <-c(6.32, 1.56,  8.61, 4.86, 3.32, 
                4.31,  1.84, 10.45, 1.47, 4.57, 
                1.95,  5.93,  8.89, 1.16,   NA,
                  NA)

## experiment
cort.disturbed <- c(7.38,  5.39, 5.39, 5.73, 18.35, 
                    0.95,  1.72, 7.26, 1.38,  4.22, 
                    7.52, 12.52, 3.86, 3.12,  1.36, 
                    2.26,  0.85, 4.76, 0.95,  6.92, 
                    2.16)

# W chromome - sex

#dist.asdkjdfa
sex.dist <-  c("M", "M", "F", "F", "F", "M", "F", "M", "F", "M", "F",
                "F", "M", "F", "M", "M", "F", "M", "F", "M", "M")

sex.cntrl <- c("F","M","F","F","F","F","F","M","F","F","M","F","M","M",
               "F","F")       

Getting to know my data

# what type of data, what type of data structure
is(telo.control)

## [1] "numeric" "vector"

is.vector(telo.control)

## [1] TRUE

is.data.frame(telo.control)

## [1] FALSE

# length
length(telo.control)

## [1] 16

length(telo.disturbed)

## [1] 21

RMarkdown

Acts like wordprocessor

hist(telo.disturbed)