$---$

title: "Project $1"$

author: "Your Name Here"

format:

html:

self$-$contained: true

echo: true

message: false

warning: false

error: true # IMPORTANT NOTE $-$ this makes the file render even if there is an error. it is imperative that you check your $.$html document $*$before submission$*$ to make sure that it has all results in it$.$

editor: source

$---$

$**$This week you will be analyzing data from the Jackson Heart Study $($JHS$).$ You can find the data on Canvas. For full credit, you must include all code chunks and R output backing up your responses.$**$

$**0.$ Import the JHS data; you can download it from Canvas. You need to research how to read a SAS data file into R $($hint: look into the $`$haven$`$ package$).**$

$```\{$r$\}$

#install.packages$("$tidyverse$")$

library$($haven$)$

jhs $<-$ read$\_$sas$("$C:$\backslash \backslash$Users$\backslash \backslash$Priya Rajah$\backslash \backslash$Downloads$\backslash \backslash$analysis$1.$sas$7$bdat"$)$

$```$

Insert your answer here :)

$**1$a$.$ Model systolic blood pressure $(*$sbp$*$; mmHg$)$ as a function of age $(*$age$*$; years$),$ education $(*$HSgrad$*$; $0=$no$,1=$yes$),$ and body mass index $(*$BMI$*$; kg$/$m$2).$ Remember to report the resulting model.$**$

$```\{$r$\}$

m$1<-$ glm$($sbp ~ age $+$ HSgrad,

data $=$ jhs$,$

family $=$ "gaussian"$)$

summary$($m$1)$

$```$