# knitr support test for recordr

#### Gabriel Becker and Sara Moore

I’m testing knitr_and_record. Can it find this Fancy Phrase?

How about these plots? horsepower is an interesting thing to study

    library(ggplot2)

    p = qplot(mtcars$wt, mtcars$hp)
    p

more text here again

    fit = lm(hp~wt, data = mtcars)
    fit

    ##
    ## Call:
    ## lm(formula = hp ~ wt, data = mtcars)
    ##
    ## Coefficients:
    ## (Intercept)           wt
    ##      -1.821       46.160

Seems like horsepower is related to weight!