|
|
@@ -62,4 +62,31 @@ Let's plot ELISA vs Time to diagnosis |
|
|
|
plot(ind_attr$ELISA ~ ind_attr$Time_to_diagnosis) |
|
|
|
``` |
|
|
|
|
|
|
|
So, it looks like late diagnosis has an effect. |
|
|
|
So, it looks like late diagnosis has an effect. This is just a quick example, let's continue loading sets from |
|
|
|
|
|
|
|
``` |
|
|
|
cytokines.csv |
|
|
|
final_outcome_jan2020.csv |
|
|
|
Individual_attributes.csv |
|
|
|
pcr.csv |
|
|
|
supernatant.csv |
|
|
|
transcriptomics.csv |
|
|
|
treg_phenotype_data.csv |
|
|
|
``` |
|
|
|
|
|
|
|
```{r} |
|
|
|
cytokines = read.csv("cytokines.csv") |
|
|
|
final = read.csv("final_outcome_jan2020.csv") |
|
|
|
pcr = read.csv("pcr.csv") |
|
|
|
supernatant = read.csv("supernatant.csv") |
|
|
|
transcriptomics = read.csv("transcriptomics.csv") |
|
|
|
treg = read.csv("treg_phenotype_data.csv") |
|
|
|
``` |
|
|
|
|
|
|
|
when they load you can explore the data in the top right enviroment or |
|
|
|
|
|
|
|
```{r} |
|
|
|
show(pcr$day[1:3]) |
|
|
|
``` |
|
|
|
|
|
|
|
It will show that not all rows are labeled. That means we will need a way to cross-reference by ID. |